GetErrorString 方法示例

下列示例说明了用户可以如何使用GetErrorString来处理所发生的错误。在这一示例中，设置Bitmap1.CurrentImage = 4时会产生错误，迫使错误处理器生效。

Dim sErrString As String

On Error GoTo errhand

Bitmap1.CurrentImage = 4

errhand:

sErrString = System.GetErrorString(Err.Number)