# Raise 方法
object.Raise(number, source, description, helpfile, helpcontext)
生成运行时错误
参数 | 描述 |
---|---|
object | 必选项。应为 Err 对象。 |
Number | 必选项。Long 整数子类型,标识错误性质。VBScript 错误(有 VBScript 定义和用户定义两种错误)的范围在 0-65535 之间。 |
Source | 必选项。命名最初产生错误的对象或应用程序的string expression。当为 Automation 对象设置此属性时,请使用窗体 project.class。如未作任何指定,则使用当前 VBScript 项目的程序设计 ID。 |
Description | 必选项。描述错误的字符串表达式。如未指定,则检查 number 的值。如可将其映射为 VBScript 运行时错误代码,则将 VBScript 提供的字符串作为 description 使用。如没有与 number 对应的 VBScript 错误,则使用通用错误信息。 |
Helpfile | 必选项。Help 文件的完整合法的路径,在该 Help 文件中可找到此错误的帮助信息。如未指定,则 VBScript 将使用 VBScript Help 文件的完整合法的驱动器、路径和文件名。 |
Helpcontext | 必选项。上下文 ID,标识 helpfile 中提供错误帮助的主题。如果省略,则使用与 number 属性对应的错误的 VBScript Help 文件上下文 ID(如果存在)。 |
说明 除了 number 以外的所有参数都是可选项的。如果使用 Raise,而不指定某些参数,且 Err 对象的属性设置含有未清除的值,则这些值将成为错误的值。
在Automation object中设置错误代码的 number 属性时,请向常数 vbObjectError 添加错误代码编号。例如,要生成错误号 1050,可将 number 属性赋值为 vbObjectError + 1050 。
下面例子举例说明如何使用 Raise 方法:
On Error Resume Next
Err.Raise 6 '产生溢出错误。
MsgBox ("Error # " & CStr(Err.Number) & " " & Err.Description)
Err.Clear '清除错误。
1
2
3
4
2
3
4
应用于