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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → [求助]关于VBA控制k线图的一些问题

   

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


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

主题:[求助]关于VBA控制k线图的一些问题

帅哥哟,离线,有人找我吗?
lhxpanda
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:9 积分:0 威望:0 精华:0 注册:2015/8/27 12:08:43
[求助]关于VBA控制k线图的一些问题  发帖心情 Post By:2015/9/2 13:46:04 [只看该作者]

 我要实现在一分钟k线图上,每次挪动240根k线,现在实现了挪动,但是在不连接行情数据只用本地数据的情况下,挪动之后的k线图不重新计算最高点和最低点,造成k线图有时出框。如下图
图片点击可在新窗口打开查看
我的代码如下:
    Set Grid = Technic.GetGridByName("Main")
    nn=Grid.startshowindex
    Grid.startshowindex(nn-240)
    Technic.Refresh
请老师帮忙指导一下怎么改正,谢谢,我是新手,能帮我举个小例子吗,谢谢
还有一个问题,我记得官网上的培训视频里有个老师说过,VBA可以实现软件上所有手动可以实现的功能,我现在想要文件菜单下输出图形这个功能,可否实现,能不能给个例子,谢谢

 回到顶部
帅哥哟,离线,有人找我吗?
yukizzc
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2015/9/2 15:16:18 [只看该作者]

用窗格的MaxPrice属性来控制,这是个类似例子,通过循环当前图表里的最大值然后去设置窗格属性

Max = 0
Min = 500000

For i=N to N+120
If MinuteData.NewPrice(i)>Max Then Max = MinuteData.NewPrice(i)
If MinuteData.NewPrice(i)<Min Then Min = MinuteData.NewPrice(i)
Next

Grid.MaxPrice = Max
Grid.MinPrice = Min

 

你后面这个不行


 回到顶部
帅哥哟,离线,有人找我吗?
lhxpanda
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:9 积分:0 威望:0 精华:0 注册:2015/8/27 12:08:43
  发帖心情 Post By:2015/9/2 15:22:53 [只看该作者]

 不能实现截图吗

 回到顶部
帅哥哟,离线,有人找我吗?
yukizzc
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2015/9/2 15:31:54 [只看该作者]

做不到


 回到顶部
帅哥哟,离线,有人找我吗?
lhxpanda
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:9 积分:0 威望:0 精华:0 注册:2015/8/27 12:08:43
  发帖心情 Post By:2015/9/2 15:44:51 [只看该作者]

 感谢

 回到顶部