Sub gsinfo()
Set Grid = Technic.GetGridByName("Main")
'得到品种代码
Set ReportData = Grid.GetReportData()
MarketName = ReportData.MarketName
Label = ReportData.Label
'注册品种
call marketdata.RegReportNotify(Label,MarketName)
'得到行情报价
Set Report1 = marketdata.GetReportData(Label,MarketName)
'获得周期类型
zq = Grid.CycType
'获取公式数据
Set Formula = marketdata.STKINDI(Label,MarketName,"MA",0,zq)
zs = Formula.GetBufData("MA1",DataSize-1)
msgbox "市场:"&MarketName&" 代码:"&Label&" 周期:"&zq&" MA1:"&zs
End Sub
技术分析已经打开,k线叠加MA线
测试没有错误,但返回的市场、代码、周期都是正确的,但MA1为0,没有数据,请高手指教
我搞了一个窗体,用给文本框赋值的方法显示当前最新价格,当加载窗体后,当时的价格是有了,但是当合约价格变化时,窗体上的价格却不变化,请问,通过什么方法,可以让窗体的最新价实时和合约价格保持一致。