Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 4312|回复: 3

[分享] 【烟花原创】VBA零基础之第100篇 VBA错误处理(四)

[复制链接]
发表于 2014-2-16 11:28 | 显示全部楼层 |阅读模式
本帖最后由 hwc2ycy 于 2014-2-16 11:30 编辑

HelpFile 属性
返回或设置一个字符串表达式,表示帮助文件的完整限定路径,可读/可写。
说明:
如果 HelpFile 中指定了帮助文件,则当用户在错误消息对话框中按下 帮助 按钮时,帮助文件被自动调用。
如果 HelpContext 属性包含被指定文件的有效的上下文 ID,则自动显示那一主题。
如果未指定 HelpFile,则显示 Visual Basic 帮助文件。
注意:应该在应用程序中写入一些例程来处理常见错误。当使用对象编程时,可以用该对象的帮助文件来提高处理错误的质量,而如果错误无法补救,则要为用户显示一段有意义的消息。
示例:
1.jpg
效果如下图:
2.jpg
另外这个帮助按钮可以设置成缺省按钮,有兴趣的童鞋可以查看Msgbox函数。

HelpContext 属性
返回或设置一个字符串表达式,包含 Microsoft Windows 帮助文件中的主题的上下文 ID
说明:
HelpContext 属性被用来自动显示 HelpFile 属性中指定的帮助主题。
如果 HelpFile HelpContext 都是空的,则检查 Number 的值。
如果 Number 的值与 Visual Basic 运行时错误一致,则对此错误使用 Visual Basic 帮助上下文 ID
如果 Number 的值与 Visual Basic 错误不一致,则在屏幕上显示 Visual Basic 帮助文件的内容。
注意:应该在应用程序中写入一些例程来处理常见错误。当使用对象编程时,可以用该对象的帮助文件来提高处理错误的质量,而如果错误无法补救,则要为用户显示一段有意义的消息。
示例:
3.jpg

Clear 方法
清除 Err 对象的所有属性设置。
语法:Err.Clear
说明:
在处理错误之后使用 Clear 来清除 Err 对象,例如,在对 On Error Resume Next 使用拖延错误处理时就可使用 Clear
每当执行下列语句时就会自动调用
Clear 方法:
任意类型的 Resume 语句
Exit Sub, Exit Function, Exit Property
任何 On Error 语句
示例:
4.jpg

Raise 方法
产生运行时错误。
语法:
Err.Raise number, source, description,helpfile, helpcontext
Number 必需的。Long整数,识别错误性质。
当在类模块中将 Number 属性设置成自己的错误代码时,可将错误代码号添加到 vbObjectError 常数上。
例如,为了产生错误号
513,可将 vbObjectError + 513 赋值到 Number 属性。
source 可选的。字符串表达式,为产生错误的对象或应用程序命名。
如果没有指定
source,则使用当前 VBA工程的工程名字。
description 可选的。描述错误的字符串表达式。
如果没有指定,则检查 Number 的值。如果可以将错误映射成 Visual Basic 运行时错误代码,则将 Error 函数返回的字符串作为 Description 使用。
如果没有与 Number 对应的 Visual Basic 错误,则要用到消息“应用程序定义的错误或对象定义的错误”。
helpfile 可选的。帮助文件的完整限定的路径,在帮助文件中可以找到有关错误的帮助信息。如果没有指定,则 Visual Basic 会使用 Visual Basic 帮助文件的完整限定的驱动器、路径和文件名。
helpcontext 可选的。识别 helpfile 内的标题的上下文 ID,而 helpfile 提供有助于了解错误的描述。
如果省略,则使用处理有关错误的
Visual Basic 帮助文件的上下文 ID,该 ID Number 属性对应。
说明
除了 number 之外,所有参数都是可选的。
如果使用 Raise 而不指定一些参数,并且 Err 对象的属性设置含有未清除的值,则视这些值为错误的值。
Raise 被用来生成运行时错误,并可用来代替Error 语句。
当书写类模块时要生成错误,Raise 是有用的,因为 Err 对象比 Error 语句可能提供更丰富的信息。例如,用 Raise 方法,可以在 Source 属性中说明生成错误的来源,可以引用该错误的联机帮助。
发表于 2014-6-11 17:11 | 显示全部楼层
回复

使用道具 举报

发表于 2014-6-18 13:43 | 显示全部楼层
回复

使用道具 举报

发表于 2020-2-3 08:21 | 显示全部楼层
还有很多看不懂先收藏
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-2 10:33 , Processed in 0.288979 second(s), 8 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表