51Testing软件测试论坛

标题: 求助一个关于WinEdit 取值问题 [打印本页]

作者: hongxun 时间: 2012-7-26 21:09
标题: 求助一个关于WinEdit 取值问题
SystemUtil.Run "C:\WINDOWS\system32\calc.exe","","C:\WINDOWS\system32","open"
Window("regexpwndtitle:=计算器","regexpwndclass:=scicalc").Activate

With Window("regexpwndtitle:=计算器","regexpwndclass:=scicalc")
.WinButton("text:=2","object class:=button").Click
.WinButton("text:= \+","object class:=button").Click
.WinButton("text:=1","object class:=button").Click
End With

For Iterator = 1 To 3 Step 1
Window("regexpwndtitle:=计算器","regexpwndclass:=scicalc").WinButton("text:==","object class:=button").Click
Next

Dim iResult
Set Result=Window("regexpwndtitle:=计算器","regexpwndclass:=scicalc").WinEdit("nativeclass:=Edit","object class:=Edit")
iResult=Cint(Result.GetROProperty("nativeclass:=Edit","object class:=Edit"))
If iResult=5 Then
Reporter.ReportEvent micPass,"

ASS" ,"输出正确"
Else
Reporter.ReportEvent micPass,"NG" ,"输出错误"
End If

Window("regexpwndtitle:=计算器","regexpwndclass:=scicalc").Close

里面的iResult 一直等不到 5 这个数字只能取到0 说明iResult=Cint(Result.GetROProperty("nativeclass:=Edit","object class:=Edit"))
这个函数只是做了无用功更本没有得到计算器中最后加的结果5.
不知道是我写错了，还是有什么特殊取法求教下....

作者: 云层 时间: 2012-7-27 08:55
写的有点复杂么能识别干嘛非要用那么多属性，干嘛非要用DP,getro不是你这样用的。。
iResult=cdbl(Window("regexpwndtitle:=计算器").WinEdit("nativeclass:=Edit").GetROProperty("text")

作者: shingo0109 时间: 2012-7-27 09:18
GetROProperty里面应该放的是你需要获取的该对象的某一个属性，不是像LZ这么写的

作者: hongxun 时间: 2012-7-27 14:32
呵呵！在学习中GetROProperty用法我不太清楚。改成GetROProperty("text") 可以取到值了。至于那个属性取太多，我也不知道为什么取单属性就是识别不出来，所以我才多加了个属性。

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)