高级功能研发区-如何用VBA添加自选股金字塔客服中心 - 专业程序化交易软件提供商

以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  如何用VBA添加自选股  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=141245)

--  作者：deni977
--  发布时间：2016/10/18 21:26:47
--  如何用VBA添加自选股
如题

--  作者：王锋
--  发布时间：2016/10/19 12:20:58
--

\'创建Block外部对象，将对象实例置变量b中
Set b = CreateObject("Stock.Block")

\'打开市场指定分类名称的板块
call b.open("自选股",1)

call b.AddStock("SH","600000")
call b.ToSave("自选","自选股")

\'不要忘记释放对象，不然会导致内存泄漏
SET b = nothing

--  作者：deni977
--  发布时间：2016/10/19 15:03:47
--
谢谢