软件测试论坛 › [QuickTest Professional] › 怎么会获取price 字符串中的数字呢？

小丫头amy 发表于 2012-12-19 17:46:40

怎么会获取price 字符串中的数字呢？

怎么获取price 字符串中的数字呢？

黑羽祭 发表于 2012-12-20 09:17:17

本帖最后由 黑羽祭 于 2012-12-20 15:09 编辑

回复 1# 小丫头amy


    Dim Price
'''获取控件中内容
Price = Window("Flight Reservation").WinEdit("Price:").GetROProperty("text")
'''去掉最前面符号
Price = mid(Price,2)
'''转换为double型
PriceNum = cdbl(Price)

小丫头amy 发表于 2012-12-20 13:37:17

回复 2# 黑羽祭
为什么我用tickets*price时 结果只保留一个小数点
Num=clng(Window("Flight Reservation").WinEdit("Tickets:").GetROProperty("text"))
total=num*price

黑羽祭 发表于 2012-12-20 14:34:15

回复 3# 小丫头amy


    我做了个去掉最左边的"$"符号的动作的。
你也照着我的脚本，再试一下看看呢。

小丫头amy 发表于 2012-12-20 14:59:15

回复 4# 黑羽祭


    我是按着这个 脚本做的，就是把取得的price去掉左边$,然后把这个price乘以tickets数，比如price是159.47，乘以tickets=1后，就变成了159.5

黑羽祭 发表于 2012-12-20 15:06:59

本帖最后由 黑羽祭 于 2012-12-20 15:08 编辑

回复 5# 小丫头amy


刚刚写的脚本有点问题，现在重写，这次是把你后面的那段也加上了：Dim Price
Price = Window("Flight Reservation").WinEdit("Price:").GetROProperty("text")
Price = mid(Price,2)
Price = cdbl(Price)

Dim Num
Num = Window("Flight Reservation").WinEdit("Tickets:").GetROProperty("text")

Dim Total
Total = Price * Num

msgbox Total

查看完整版本: 怎么会获取price 字符串中的数字呢？