常见运行出错问题分析:
1)对象库保证有对象的存在
2)配置路径的正确性
3)运行时程序的窗口与代码是否对应
4)不可打开多个窗口进行运行
5)注意值的匹配
问题解决方案:
Action1——>resources——>联系对象库——>到导出来的文件../wenjianming
从程序中更新对象时需注意的问题:选中对象的属性,还要与程序中的内容相对应,用小手选中,在高光显示。
判断语句:
Dim a,b,c,d,e
a = Window("FlightReservation").WinEdit("Tickets:").GetROProperty("text")
msgbox a "获取订票数(a为字符类型)"
b= Window("FlightReservation").WinEdit("Price:").GetROProperty("text")
msgbox b
c=split(b,"$")”获取单价数组类型“
msgbox c(1)
d=Window("Flight Reservation").WinEdit("Total:").GetROProperty("text")
e=split(d,"$")
msgbox e(1)获取总价数组类型
x=cdbl(a)
y=cdbl(c(1))转换为精度型
z=cdbl(e(1))
If z-x*y<0.001 Then比较是否相等
reporter.ReportEvent micPass,"检查Price*Ticket的价格是否等于Total","正确"
Else
reporter.ReportEvent micFail,"检查Price*Ticket的价格是否等于Total","错误"
msgbox"错误"
End If
MsgBox是Visual Basic和VBS中的一个函数,功能是弹出一个对话框,等待用户单击按钮,并返回一个Integer值表示用户单击了哪一个按钮。
“MsgBox”即为“MessageBox”的缩写,在英语中意为“信箱”。
cdbl数据类型转换函数之一,将字符串转换为双精度值,同类函数有CLNG,CINT等。
CDBL用于返回表达式,此表达式已被转换为 Double 子类型的Variant。
语法
CDbl(expression)
expression 参数是任意有效的表达式。