您现在的位置:程序化交易>> 期货公式>> 金字塔等>> 金字塔知识>>正文内容

VBA文本框取值问题 [金字塔]

  • 咨询内容: Set Report1 = marketdata.GetReportData("IF08","ZJ") currentPrice = Report1.NewPrice '现在最新价是2192 price = CATraderUI_priceTextBox.value
    if (currentPrice >= price) then     msgbox ">=" else     msgbox "<" end if
     '无论在文本框中输入任何数,最后均出现 "<" 提示!不知问题出在哪儿了? 但如果我改写成
    ... if (currentPrice >= 2000) then msgbox ">=" else msgbox "<" end if   最后出现正确的提示 ">="   CATraderUI_priceTextBox文本框取值.Text取出来是String,.value取出来的Variant数据类型,它均不能与Report1.NewPrice直接比较大小吗? 切盼回复,谢谢!

     

  • 金字塔客服: price = CDbl(CATraderUI_priceTextBox.value)   强制转换一下文本框的文本为数字后再试试

     

  • 用户回复: 果然OK了!万分感激!

 

有思路,想编写各种指标公式,程序化交易模型,选股公式,预警公式的朋友

可联系技术人员 QQ: 1145508240  有需要帮忙请点击这里留言!!!进行 有偿 编写!不贵!点击查看价格!


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容