分享此页面
相关项: GUI 测试和脚本化 GUI 组件
消息语句可为运行结果添加注释，或添加要在运行测试时显示在“输出”窗格中的注释。
例如，您可能要为运行结果添加有关所测试应用程序或所用操作系统的注释。或者，向运行结果发送一条消息，指示在执行特定步骤期间缺少特定对象。
HTML 报告中的测试运行消息
如果使用 HTML 报告，请通过在测试或组件中插入 Reporter.AddTestInformation 步骤来添加注释。
Reporter.AddTestInformation "Test status","Passed"
在运行结果中，此信息显示在运行结果摘要中。
Run Results Viewer 中的测试运行消息
如果使用 Run Results Viewer，请通过在测试或组件中插入 Reporter.ReportNote 步骤来添加注释。
Reporter.ReportNote "This test was run from 12.34.56.89 using a wireless connection."
该注释将显示在 Run Results Viewer 中的“执行摘要”页面上。
Run Results Viewer 中的步骤消息
通过插入 Reporter.ReportEvent 步骤向运行结果发送有关特定步骤的消息。
Reporter.ReportEvent micFail, "Password edit box", "Password edit box does not exist"
在此示例中，micFail 指示报告的状态（失败）。Password edit box 是报告名称，Password edit box does not exist 是报告消息。
使用以下状态:
| 状态 | 描述 |
|---|---|
| micPassed | 导致此步骤通过并将消息发送到报告。 |
| micFailed | 导致此步骤 (因而导致测试) 失败并将消息发送到报告。 |
| micDone | 在步骤未通过或未失败的情况下发送消息。 |
| micWarning | 发送步骤的警告状态，但不停止步骤，也不将步骤设为通过或失败。 |
在测试运行期间显示消息
使用以下方法在运行系统期间显示消息。
| 消息显示方法 | 描述 |
|---|---|
| Print 实用程序语句 |
在测试运行期间，在“输出”窗格中显示消息。 |
| MessageBox VBScript 函数 | 显示暂停测试运行的消息，直到消息框被关闭为止。 |
例如:
以下代码会对 Flight Table 对话框 (在示例 Flight 应用程序中) 中的所有项执行迭代，并使用 Print 实用程序语句将每项的内容打印到“输出”窗格。
Set FlightsList = Window("Flight Reservation").Dialog("Flights Table").
WinList("From")
For i = 1 to FlightsList.GetItemsCount
Print FlightsList.GetItem(i - 1)
Next
