几种信息提示方法（一）

上一篇 / 下一篇 2007-05-11 15:49:20 / 个人分类：QTP学习

1. Reporter对象的ReportEvent方法

描述

在test result中报告测试结果。

语法

Reporter.ReportEventEventStatus, ReportStepName, Details [, in]

Argument	Type	Descrīption
EventStatus	Number or pre-defined constant	状态值: 0或micPass:将本步骤的运行结果状态设置为“Pass”，并向Result中产生报告信息。如果想在报告中生成“通过”报告，用本状态值。 1或micFail:将本步骤的运行结果状态设置为“Fail”，并向Result中产生报告信息。当脚本中运行本语句时，整个测试的结果状态是“fails”。如果想在报告中生成“失败”报告，用本状态值。如果运行了本语句，则整个测试的状态为“Fail”。 2或micDone:仅向Result中产生报告信息，但不影响整个测试的结果状态。如果想在报告中生成“完成”报告，用本状态值。 3或micWarning:S向Result中产生报告信息，但是不会中断测试的运行，也不影响测试的pass/fail status。如果想在报告中生成“警告”报告，用本状态值。运行这个语句后，整个测试结果状态为“Warning”。
ReportStepName	String	将在报告中显示的步骤名称(object name).
Details	String	报告的详细信息。这些信息是本条报告的“Details”信息。
in	N/A	Not in use.

举例：下面的例子使用ReprotEvent方法来报告一个失败信息。

Reporter.ReportEvent1, "Custom Step", "The user-defined step failed."

或

Reporter.ReportEventmicFail, "Custom Step", "The user-defined step failed."

2. MsgBox函数

在运行脚本的过程中，弹出对话框，等待用户手工点击按钮干预。本语句根据用户点击按钮的情况得到返回值。

这个语句适用于脚本的调试过程。

Ø 语法

MsgBox(prompt[,buttons][,title][,helpfile,context])

Ø 参数

prompt将在对话框中显示的信息。最大长度为1024字符。如果内容有多行，可以用(Chr(13))来表示回车符，或用(Chr(10))表示换行符，或用(Chr(13) & Chr(10))表示回车-换行符。

buttons按钮的值。默认值为0。

title弹出框的标题，将显示在标题栏。

Ø Settings

按钮值的说明:

内容	值	描述
vbOKOnly	0	只显示OK按钮
vbOKCancel	1	显示OK以及Cancel按钮。
vbAbortRetryIgnore	2	显示Abort、Retry以及Ignore按钮。
vbYesNoCancel	3	显示Yes、No以及Cancel按钮
vbYesNo	4	显示Yes和No按钮
vbRetryCancel	5	显示Retry和Cancel按钮
vbCritical	16	Display Critical Message icon.
vbQuestion	32	Display Warning Query icon.
vbExclamation	48	Display Warning Message icon.
vbInformation	64	Display Information Message icon.
vbDefaultButton1	0	First button is default.
vbDefaultButton2	256	Second button is default.
vbDefaultButton3	512	Third button is default.
vbDefaultButton4	768	Fourth button is default.
vbApplicationModal	0	应用程序模式。用户必须对信息框做出响应，脚本运行才能继续。
vbSystemModal	4096	系统模式。所有的应用被挂起，直到用户对信息框做出响应。

Ø 返回值

MsgBox功能的返回值

用变量名＝MsgBox(prompt[,buttons][,title][,helpfile,context])的方法获取返回值。