CVErr 函數

附註: 我們想要以您的語言,用最快的速度為您提供最新的說明內容。本頁面是經由自動翻譯而成,因此文中可能有文法錯誤或不準確之處。讓這些內容對您有所幫助是我們的目的。希望您能在本頁底部告訴我們這項資訊是否有幫助。此為英文文章出處,以供參考。

傳回的變化子類型包含錯誤編號使用者指定的錯誤

語法

CVErr ( 錯誤號碼 )

必要的錯誤號碼引數是有效的錯誤的數字。

備註

您可以使用CVErr函數,使用者建立程序中建立使用者定義的錯誤。例如,如果您建立接受多個引數,並以正常方式傳回字串的函數,您可以有函數評估輸入引數,以確保這些可接受的範圍內。如果不是,可能是您函數不會傳回您預期的事情。在此情況下,cverr 會傳回錯誤的數字,告訴您要採取什麼動作。

請注意,不允許隱含轉換的錯誤。例如,您無法為不是Variant變數直接指定CVErr的傳回值。不過,您可以執行明確轉換 (使用CIntCDbl等等) 的CVErr所傳回的值,並指定的適當資料類型的變數。

範例

附註: 下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊,請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考],並在 [搜尋] 方塊中輸入一個或多個字詞。

此範例使用CVErr函數,傳回一個VariantVarTypevbError (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 技巧
探索訓練
優先取得新功能
加入 Office 測試人員

這項資訊有幫助嗎?

感謝您的意見反應!

感謝您的意見反應! 我們將協助您與其中一位 Office 支援專員連絡以深入了解您的意見。

×