欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → vba 如何获取当前显示品种的K线序列?

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有2955人关注过本帖树形打印复制链接

主题:vba 如何获取当前显示品种的K线序列?

美女呀,离线,留言给我吧!
zm71212302
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:201 积分:0 威望:0 精华:0 注册:2013/4/6 22:01:12
  发帖心情 Post By:2020/2/3 12:41:30 [显示全部帖子]

' 得到框架名称为"Technic",窗格名称为"Main"的窗格对象
sub bbk()
dim grid,History,Close
 if Application.isActivateFrame("Technic")=0 then
Call application.ActivateFrame("Technic") 
end if
Set Grid = Technic.GetGridByName("Main") 
'得到该窗格所对应的对象
Set History = Grid.GetHistoryData()
'取最后一天的收盘价
Close = History.Close(History.Count-1)
MsgBox Close
end sub


 回到顶部