标题：如何打开指定日期的K线

1楼

deni977 发表于：2014/10/14 11:58:37

如题，我们在检测策略的时候，想看看过去某一天的K线上的策略表现信号情况，如何用VBA打开框架，并将当前窗格显示移到指定日期的K线？

2楼

王锋发表于：2014/10/14 13:53:48

建议你仔细看看金字塔的VBA编程手册,给你提示几个函数

PosByDate 以日期为参数，返回与之相对应的周期序列

ShowCount 窗格显示数据量，可与Grid.StartShowIndex配合可以实现画面平移，可读写

StartShowIndex 窗格第一个显示数据的基于0的索引，可与Grid.ShowCount配合可以实现画面平移，可读写

3楼

deni977 发表于：2014/10/14 14:58:25

谢谢指导。

我的版本是3.31，PosByDate 这个方法有，ShowCount、StartShowIndex这两个方法没有找到，难道不是Grid对象的吗？看的是帮助菜单的“VBA编程信息”

4楼

王锋发表于：2014/10/14 15:06:40

ShowCount、StartShowIndex 是Grid对象的属性, 请认真翻阅编程手册

5楼

deni977 发表于：2014/10/15 12:02:28

不懂VBA，确实是很痛苦，简直是文盲一样。折腾了一个晚上，还是没有解决问题，程序代码如下，请高手指点：

        Call Application.ActivateFrameWithCode("Technic","IF00","ZJ",12)  '打开多秒周期框架
       Set Grid = Technic.GetGridByName("Main")
       Grid.MaxLoadCount = 4000
        'Grid.SetDataCount(2000)

Grid.StartShowIndex = 500 '希望窗格从第500根K线开始显示
Grid.ShowCount = 1000 '希望窗格显示1000根K线

Grid.ReInitData

Application.MsgOut Grid.StartShowIndex '输出信息

Application.MsgOut Grid.ShowCount '输出信息

结果：没有实现指定的K线段到主窗格，当前主窗格显示总数也不是程序指定的 1000根，因为初学VBA，比较吃力，请指导为盼。

[此贴子已经被作者于2014/10/15 12:02:52编辑过]

6楼

guotx2010 发表于：2014/10/15 15:30:01

你第一行，打开多秒周期，本地可能没有那么多数据呀，建议改为日线，我昨天给你的代码，不能实现吗？

7楼

deni977 发表于：2014/10/15 18:59:12

以下是引用guotx2010在2014/10/15 15:30:01的发言：
你第一行，打开多秒周期，本地可能没有那么多数据呀，建议改为日线，我昨天给你的代码，不能实现吗？

首先我是保证了本地数据是完整的，已经下载好数据。你提供的方法，我也测试了，不能实现。

8楼

deni977 发表于：2014/10/15 19:00:25

金字塔这个VBA的具体编程例子确实很少，给新手们带来了一些困难，我想慢慢会摸索出来的。

9楼

马良发表于：2014/10/15 21:44:59

你先打开图表看看到底能显示那么多k线么？

共9 条记录, 每页显示 10 条, 页签: [1]