[求助]帮忙看看这个过程有什么问题 - 高级功能研发区 - 金字塔客服中心 - 专业程序化交易软件提供商

金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → [求助]帮忙看看这个过程有什么问题

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

共有3021人关注过本帖树形打印复制链接主题：[求助]帮忙看看这个过程有什么问题

jinze

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：论坛游侠帖子：104 积分：447 威望：0 精华：0 注册：2010/4/25 18:39:52

[求助]帮忙看看这个过程有什么问题 发帖心情

Post By：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