QTP_Calculator basic

最新推荐文章于 2025-01-22 23:51:24 发布

原创最新推荐文章于 2025-01-22 23:51:24 发布 · 604 阅读

0 ·

CC 4.0 BY-SA版权

QTP 专栏收录该内容

11 篇文章

订阅专栏

本文介绍了一个使用自动化脚本操作计算器应用程序的过程。通过设置对象属性、检查属性和检查点，演示了如何实现数值输入、基本算术运算及结果验证。重点包括对象识别、按钮点击、文本属性读取和自动化测试报告。

' Core points of this execise:

'1. Object property set in Object Repository

2. Check property

'3. Check checkpoint

'4. Output checkpoint

SystemUtil.Run "C:\WINDOWS\system32\calc.exe","","C:\WINDOWS\system32","open"
Window("Calculator").WinButton(datatable("V1",dtGlobalSheet)).Click
Window("Calculator").WinButton(datatable("V3",dtGlobalSheet)).Click
Window("Calculator").WinButton(datatable("V2",dtGlobalSheet)).Click
'msgbox Window("Calculator").WinButton(datatable("V2",dtGlobalSheet)).GetROProperty("text")

Window("Calculator").WinButton("+").Click
Window("Calculator").WinButton(datatable("V1",dtGlobalSheet)).Click
Window("Calculator").WinButton(datatable("V3",dtGlobalSheet)).Click
Window("Calculator").WinButton(datatable("V2",dtGlobalSheet)).Click
'Window("Calculator_2").WinButton("=").Output CheckPoint("V4")
Window("Calculator").WinButton("=").Click
'Window("Calculator").WinEdit("Edit").CheckProperty "text", int(datatable("Re",dtGlobalSheet))
'Window("Calculator").WinEdit("Edit").Check CheckPoint("Edit")
Window("Calculator").WinEdit("Edit").Output CheckPoint("Edit_2")

'Reporter
Dim str
str=datatable("V1",dtGlobalSheet) & datatable("V3",dtGlobalSheet) & datatable("V2",dtGlobalSheet) & "+" & datatable("V1",dtGlobalSheet) & datatable("V3",dtGlobalSheet) & datatable("V2",dtGlobalSheet) & "=" & datatable("Re",dtGlobalSheet)
Reporter.ReportEvent micPass, "ADD", str

Window("Calculator").Close