HOME
ID : 440
Err.Raise
功能
执行程序时发生指定错误。
格式
Err.Raise 错误编码
指定项目
- 错误编码
- 使用整数型数据的16进制表示方式指定错误编码。
解说
- 执行程序时发生指定错误。可指定系统中已经定义的错误编码。请参照错误编码表。
- 16进制表示的错误编码的第7位数字表示等级。可以变更等级。
例
Err. Raise &H81600007 [自变量错误 等级1]
Err. Raise &H82600007 [自变量错误 等级2]
- 使用Err.Number、Err.Description读出生成的错误值。
注意事项
- 如果指定未定义的错误编码，则发生“未定义错误。”
- 指定的错误编码大于0(0～&H7FFFFFFF)或错误等级大于6时，
发生“&H83500127 超出数值范围。”的错误。 - 指定了编译程序时发生的错误编码(&H8*601001～&H8*605FFF)时，发生“&H83500127 超出数值范围。”的错误。
应用示例
Dim aaa As Integer
Comm. Open 1
aaa = Comm. Count(1)
If aaa < 3 Then
Err.Raise &h83600008 '发生等级3的[自变量不足]错误
End IfID : 440