1).2秒內假若出現確定對話框,點擊確定按鈕,否則打印"確定按鈕未出現" :等待2秒直到確定按鈕出現.
Result = SQAWaitForPropertyvalue("Text=(O)確定", "Enabled",TRUE, 2000)
If Result <> sqaSuccess Then
print "確定按鈕未出現"
Else
PushButton Click, "Text=(O)確定"
End If
2).2秒內假若出現標題為"Title abcd" 的窗體,打印"出現標題為Title abcd的窗體" ,否則打印"未出現標題為Title abcd的窗體" :等待2秒直到標題為Title abcd的窗體出現.
Result = SQAWaitForPropertyvalue("Caption=Title abcd", "Enabled",TRUE, 2000)
If Result <> sqaSuccess Then
PushButton Click, "Text=(O)確定"
print "出現標題為Title abcd的窗體"
Else
print "未出現標題為Title abcd的窗體"
End If
說明:
1).Result是一個Integer型變
2).SQAWaitForPropertyvalue:顧名思義,指的是等待一個屬性被指定值之前暫停執行。SQAWaitForPropertyvalue("Text=(O)確定", "Enabled",TRUE, 2000)表示等待2秒直到確定按鈕出現,如果2秒內未出現,則返回sqlfalse,出現則返回sqlsuccess;
3).SQA Basic中<>表示不等于;
4).另外,可以用SQAWaitForObject來判斷出現出現的對象類型:
Result = SQAWaitForObject("Type=PushButton;Text=OK", 2000)
If Result = sqaSuccess Then
... ' add the rest of the actions/tests here
End If
文章來源于領測軟件測試網 http://www.k11sc111.com/