ErrorToString 函数
更新：2007 年 11 月
返回与给定的错误号对应的错误信息。
Public Shared Function ErrorToString(ByVal ErrorNumber As Integer) As String
参数
- ErrorNumber
可选项。任何有效的错误号。
异常
异常类型 |
错误号 |
条件 |
|---|---|---|
ErrorNumber 超出范围。 |
如果正在升级使用无结构错误处理的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象）比较错误号。）然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述替换这种错误控制。
备注
ErrorToString 函数检查 Err 对象的属性设置以标识最新的运行时错误。ErrorToString 函数的返回值对应于 Err 对象的 Description 属性。如果 ErrorNumber 为有效错误号但尚未定义，则 ErrorToString 将返回字符串 "Application-defined or object-defined error."。如果 ErrorNumber 无效，将发生错误。如果 ErrorNumber 被省略，则返回对应于最新的运行时错误的消息。如果未发生运行时错误或 ErrorNumber 为 0，则 ErrorToString 返回零长度字符串 ("")。
在 Visual Basic 6.0 版和更早版本中，此功能由 Error 函数提供。
示例
以下代码使用 ErrorToString 函数来显示与指定的错误号对应的错误信息。
Dim ErrorNumber As Integer
For ErrorNumber = 61 To 64 ' Loop through values 61 - 64.
MsgBox(ErrorToString(ErrorNumber)) ' Display error names in message box.
Next ErrorNumber
要求
**模块：**Conversion
**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）