Sub Technic_ChangeStock(Grid, Code, Market, Result)
msgbox 222
End Sub
这个FRAME_CHANGESTOCK事件要怎么写?
这个事件是你在技术分析图上改变了当前分析的品种时,发生的,比如:你需要让技术分析图上一直显示某一个合约,可是别人不知道,换成了别的合约,你就可以通过这个代码换回来。
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