报告库内定义的用户错误

1. 定义用户错误。
   此时不仅要定义消息，标签也务必定义。

   

2. 创建用户错误报告用函数。
   

   Function RaiseError(errLabel$ As String)
      Integer errNum
   
      errNum = UserErrorNumber(errLabel$)    ' Get user error number from label
      If errNum <> -1 Then
         Error errNum
      EndIf
   Fend
   

   有关UserErrorNumber、Error，请参考以下手册。

   “SPEL+语言参考”

3. 实施错误处理。
   用于库的项目代码内的错误处理会调用上述用户错误报告用函数。

   Function SomeInternalLibraryFunction
      ' Error occurs so throw an error
      RaiseError("MyLib_Err_SomeError")
   Fend
   

4. 按照下述步骤创建库。

   创建库

5. 使用库时，在项目中登记上述步骤中创建的库后，将从用户错误的末尾开始，按顺序登记至空的错误编号。

   

   与创建库时的错误编号不同，将在库侧根据用户错误标签报告错误，因此会显示正确消息。