以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  编译错误  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=143996)
--  作者：phisherlong
--  发布时间：2016/12/3 22:56:12
--  编译错误
vba里新建模块后，输入如下代码

dim stocklabel,market

stocklabel="HSI00"
market="HZ"


sub technic_ChangeStock("main",stocklabel,market,result)

 application.msgout “ok”

end sub

但运行提示在sub technic_ChangeStock("main",stocklabel,market,result)有1010错误，缺少标识符

请教工程师们，问题何在？
--  作者：yukizzc
--  发布时间：2016/12/5 10:03:29
--  

sub technic_ChangeStock(GRIS,stocklabel,market,result)


 application.msgout  stocklabel


end sub

 

这个事件参数是输出参数，不要指定的
--  作者：phisherlong
--  发布时间：2016/12/5 10:08:16
--  
测试通过！
非常感谢