CVErr függvény

Fontos : Ez a cikk gépi fordítással lett lefordítva, lásd a jognyilatkozatot. A cikk angol változatát itt találhatja meg.

A függvény eredménye egy változatának altípus egy hibaszám a felhasználó által megadott tartalmazó hibaüzenet .

Szintaxis

CVErr ( errornumber )

A szükséges errornumberargumentum argumentum az érvényes hiba értéke.

Megjegyzések

A CVErr függvény használatával a felhasználó által létrehozott eljárások létrehozása a felhasználó által definiált hibák. Ha például hoz létre egy funkció, amely fogadja el a több argumentumot, és a szokásos módon a karakterláncot ad vissza, ha a függvény annak érdekében, hogy tartományon belül a bemeneti argumentumok kiértékelésének eredménye lehet. Ha nem, akkor valószínű a függvény nem ad vissza, mi várható. Ebben az esetben a CVErr lehetővé teszi, amely közli, hogy milyen műveletet, amely hibaszám vissza.

Figyelje meg, hogy az implicit átalakítási hiba történt a nem engedélyezett. Ha például nem közvetlenül rendelhet CVErr visszatérési értéke, amely nem egy Variantváltozó . Azonban végrehajtása (használatával CInt, CDblés így tovább) explicit konverzió CVErr által visszaadott érték és rendelhet, hogy a megfelelő adattípusváltozó.

Példa

Megjegyzés : A következő példák egy Visual Basic for Applications (VBA) modulban mutatják be a függvény használatát. A VBA használatáról a Keresés elem mellett található legördülő listából a fejlesztői forrásokat választva, majd egy vagy több keresőszót megadva kaphat további tájékoztatást.

Ebben a példában a CVErr függvény visszatérési egy Variant amelynek VarTypevbError (10). A felhasználó által definiált függvény CalculateDouble hibát ad vissza, ha a neki átadott argumentumot nem egy számot. Felhasználó által definiált hibák bevétel a felhasználó által definiált eljárások vagy érdemes halasztani egy futási idejű hiba kezelésének CVErr használhatja. A hibás függvénnyel tesztelése, ha az érték hiba jelöli.

' 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

Megjegyzés : Gépi fordítás jognyilatkozata: Ez a cikk számítógép által, emberi közreműködés nélkül lett lefordítva. A Microsoft ezeket a gépi fordításokat azért nyújtja, hogy az angol nyelvet nem beszélők minél több tartalomhoz tudjanak hozzáférni a Microsoft termékeivel, szolgáltatásaival és technológiáival kapcsolatban. A gépi fordítás miatt előfordulhat, hogy a szöveg szóhasználati, szintaktikai vagy helyesírási hibákat tartalmaz.

Ismeretek bővítése
Oktatóanyagok megismerése
Új szolgáltatások listájának lekérése
Részvétel az Office Insider programban

Hasznos volt az információ?

Köszönjük a visszajelzését!

Köszönjük visszajelzését. Jobbnak látjuk, ha az Office egyik támogatási szakemberéhez irányítjuk.

×