以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (http://222.73.7.161/bbs/index.asp) -- 高级功能研发区 (http://222.73.7.161/bbs/list.asp?boardid=5) ---- 取不到自选股品种个数 (http://222.73.7.161/bbs/dispbbs.asp?boardid=5&id=184286) |
-- 作者:weishao -- 发布时间:2021/2/18 12:58:49 -- 取不到自选股品种个数 \'取自选股品种数量: Function getstockcount()
Set blockzxg = CreateObject("Stock.Block")
call blockzxg.Open ("自选股",0)
Application.MsgOut "自选股品种个数:"&blockzxg.count()
getstockcount=blockzxg.Count()
\'创建Block外部对象,将对象实例置变量b中
Set b = CreateObject("Stock.Block")
\'打开市场指定分类名称的板块
call b.open("上海A股",0)
\'显示已打开板块内部数据个数
Application.MsgOut "上海A股数量:"&b.count()
\'不要忘记释放对象,不然会导致内存泄漏
Set b = nothing 结果是: 自选股品种个数:0 上海A股数量:1623 |
-- 作者:yukizzc -- 发布时间:2021/2/18 13:00:11 -- call blockzxg.Open ("自选股",1) call blockzxg.Open ("自选股",2)
这个type参数有几种选择的,你都挨个试下就明白
|
-- 作者:weishao -- 发布时间:2021/2/18 13:06:37 -- call blockzxg.Open ("自选股",0) 改成call blockzxg.Open ("自选股",1) 可以了 |