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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → 金字塔的策略接触VBS 需要入门导入的一段VBS代码 就是 如何以一秒一次的频率记录一个数据的当期值

   

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


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

主题:金字塔的策略接触VBS 需要入门导入的一段VBS代码 就是 如何以一秒一次的频率记录一个数据的当期值

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


加好友 发短信
等级:罗宾汉 帖子:11808 积分:20695 威望:0 精华:10 注册:2009/8/18 8:15:13
  发帖心情 Post By:2014/11/10 15:51:20 [显示全部帖子]

VBA的代码范例编写需要一定时间,请用户不要急躁.

 

如果你对VBA还是个白纸,你这种拿来主义对你没任何好处的,在我们安排范例的时间内,议你能先自学一下,至少对VBA的编程有一些最基本的了解.

参考

 

金字塔公式编写与程式化交易设计指南

http://www.weistock.com/bbs/dispbbs.asp?boardid=16&Id=55132 下方的VBA部分书籍

 

金字塔VBA常用对象使用范例

http://www.weistock.com/bbs/dispbbs.asp?boardid=5&Id=11642

 

金字塔VBA编程教程

在线观看:http://v.youku.com/v_show/id_XMTY3MjE1NjY0.html

本地下载:http://www.weistock.com/video/金字塔VBA编程教程_标清.flv

 

金字塔VBA开发系列教程-从入门到精通

在线观看:http://i.youku.com/vba123



金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
王锋
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:罗宾汉 帖子:11808 积分:20695 威望:0 精华:10 注册:2009/8/18 8:15:13
  发帖心情 Post By:2014/11/11 19:37:08 [显示全部帖子]

示例

'在Test过程中打印出上海600217品种当前最新价。
Sub test()
    set Report1 = marketdata.GetReportData("600217","SH")
    msgbox Report1.NewPrice
End Sub

示例2:
'读取白糖得日线数据
Set HistroyData = marketdata.GetHistoryData("SRX00","ZQ",5)'若要是分钟这里填0
for i = 0 to HistroyData.count-1
if i = 10 then
'显示第11个数据得时间,收盘,成交量
msgbox HistroyData.date(i)
msgbox HistroyData.Close(i)
msgbox HistroyData.Volume(i)

'数据处理完毕后,清理缓冲区
marketdata.
DestroyHistoryData

end if
next



金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部