Raise 方法

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

[code]On Error Resume Next[b]Err.Raise[/b] 6  '[/code]产生溢出错误。[code]MsgBox ("Error # " & CStr([b]Err.Number[/b]) & " " & [b]Err.Description[/b])[/code][code][b]Err.Clear[/b]    '[/code]清除错误。