以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  [求助]帮忙看看这个过程有什么问题  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=51651)
--  作者：jinze
--  发布时间：2013/5/4 9:57:49
--  [求助]帮忙看看这个过程有什么问题

本意是想用这个过程在ini文件中记录最高价，实际执行结果是最新价始终都满足大于取到的最高价，是不是没有定义变量类型的原因还是因为浮点变量不能比较大小。

Sub BuyStop()
 \'读取交易品种的动态行情数据
 set Report1 = marketdata.GetReportData(UserForm1_TextBox1.text,UserForm1_TextBox2.text)
 BuyHigh = Document.GetPrivateProfileFloat("trader", "buyprice", 0 , "d:\\caodan.ini")
 NewPrice = Report1.NewPrice
 if NewPrice > BuyHigh then
  call  Document.WritePrivateProfileFloat("trader", "buyprice", NewPrice , "d:\\caodan.ini")
 end if
End Sub
--  作者：guotx2010
--  发布时间：2013/5/4 11:58:04
--  
BuyHigh 需要进行转换，使用cdbl()函数，转换成数值型
--  作者：jinze
--  发布时间：2013/5/6 9:37:22
--  

还是一样，始终都满足条件。
--  作者：rushtaotao
--  发布时间：2013/5/6 11:40:09
--  
为什么要用ini呢 不能用金字塔的全局变量来记录？？