以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  高级功能研发区  (http://222.73.7.161/bbs/list.asp?boardid=5)
----  Technic_ChangeStock等事件为何无响应  (http://222.73.7.161/bbs/dispbbs.asp?boardid=5&id=12104)
--  作者：pel46585
--  发布时间：2012/6/3 0:59:44
--  Technic_ChangeStock等事件为何无响应

Sub Technic_ChangeStock(Grid, Code, Market, Result)
msgbox 222
End Sub

这个FRAME_CHANGESTOCK事件要怎么写?
--  作者：admin
--  发布时间：2012/6/3 9:36:01
--  
不懂你要表达的是什么，可否再详细描述
--  作者：guotx2010
--  发布时间：2012/6/3 9:58:45
--  

这个事件是你在技术分析图上改变了当前分析的品种时，发生的，比如：你需要让技术分析图上一直显示某一个合约，可是别人不知道，换成了别的合约，你就可以通过这个代码换回来。

Sub Technic_ChangeStock(Grid,Code,Market,Result) \'用户改变合约代码时发生
 if Code<>"IF06" then
  application.MsgOut "图表上不是现在交易的合约"
  Application.ActivateFrameWithCode "Technic","IF06","ZJ",0  \'激活IF06的1F周期的交易合约
  \'Call application.ActivateFrame("Cl")      \'这个是激活CL的框架，如果你使用自定义框架，就可以使用这个方法。
 end if 
End Sub
--  作者：pel46585
--  发布时间：2012/6/3 11:12:22
--  
楼上的代码,当我换品种时,还是没有任何反映啊
--  作者：guotx2010
--  发布时间：2012/6/3 12:15:59
--  
代码放到模块中，不是放到frame框架下哟。
--  作者：马良
--  发布时间：2012/6/3 16:53:56
--  
该事件要在技术分析框架下用的\'你看看是不是框架搞错了