[ 本帖最后由 wyf0452 于 2009-1-5 17:40 编辑 ]作者: wqliberal 时间: 2009-1-5 18:15
你选择Browser或者Page这一级,添加检查点应该是可以的。作者: wyf0452 时间: 2009-1-5 18:20
还是不行,在browser这里右键是没有standard checkpoint选项的,在page那里有 但是依旧报错作者: wyf0452 时间: 2009-1-5 18:23
Dim actual_value
' Get the actual property value
actual_value = obj.GetROProperty(prop_name)
' Compare the actual value to the expected value
If actual_value = expected_value Then
Reporter.ReportEvent micPass, "VerifyProperty Succeeded", "The " & prop_name & " expected value: " & expected_value & " matches the actual value"
VerifyProperty = True
Else
Reporter.ReportEvent micFail, "VerifyProperty Failed", "The " & prop_name & " expected value: " & expected_value & " does not match the actual value: " & actual_value
VerifyProperty = False
End If