語法
CVErr (錯誤編號)
所需的 錯誤編號參數是 任何有效的錯誤編號。
註解
使用 CVErr 函式在使用者建立 的程序中產生使用者定義錯誤。 舉例來說，如果你建立一個接受多個參數且通常回傳字串的函式，你可以讓函式評估輸入參數，確保它們在可接受範圍內。 如果不是，你的函數很可能不會回報你預期的效果。 在這種情況下， CVErr 允許你回傳一個錯誤編號，告訴你應該採取什麼行動。
請注意，不允許對 錯誤 進行隱性轉換。 例如，你無法直接將 CVErr 的回傳值指派給非變體變數。 不過，你可以用 CInt、 CDbl 等工具，) CVErr 回傳的值，並指派到相應 資料型態的變數，來執行明確的轉換 (。
範例
此範例使用 CVErr 函式回傳一個變 體 ，其 VarType 為 vbError (10) 。 如果傳遞給它的參數不是數字，使用者自訂函式 CalculateDouble 會回傳錯誤。 使用 CVErr 從使用者自訂程序回傳使用者自訂錯誤，或延後執行時錯誤的處理。 使用 IsError 函式來測試該值是否代表錯誤。
' Call CalculateDouble with an error-producing argument.
Sub Test()
Debug.Print CalculateDouble("345.45robert")
End Sub
' Define CalculateDouble Function procedure.
Function CalculateDouble(Number)
If IsNumeric(Number) Then
CalculateDouble = Number * 2 ' Return result.
Else
CalculateDouble = CVErr(2001) ' Return a user-defined error
End If ' number.
End Function
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。