本文介绍了一段用于验证机票预订窗口中票价乘以票数是否等于总价的自动化测试代码。通过读取“FlightReservation”窗口中的票价和票数信息，并进行数学运算来确保数据一致性。
Dim a,b,c,d,e
a = Window("FlightReservation").WinEdit("Tickets:").GetROProperty("text")
msgbox a
b= Window("FlightReservation").WinEdit("Price:").GetROProperty("text")
msgbox b
c=split(b,"$")
msgbox c(1)
d=Window("FlightReservation").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","正确"
reporter.ReportEvent micFail,"检查Price*Ticket的价格是否等于Total","错误"
msgbox"错误"
End If
扫一扫
5829
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
