Funcția CVErr

Important: Acest articol este tradus automat, consultați exonerarea de răspundere. Versiunea în limba engleză a acestui articol se poate găsi aici pentru referință.

Returnează o valoare Variant de eroare care conține o număr de eroare specificate de utilizator pentru subtip.

Sintaxă

CVErr ( errornumber )

Necesară errornumberargument este un alt număr eroare validă.

Observații

Utilizați funcția CVErr pentru a crea definite de utilizator erori în proceduri create de utilizatori. De exemplu, dacă creați o funcție care acceptă mai multe argumente și în mod normal, returnează un șir de caractere, puteți avea de funcția evaluează argumentele de intrare pentru a vă asigura că acestea sunt intervalul acceptabilă. Dacă nu există, este probabil de funcția nu va returna ceea ce vă așteptați. În acest caz, CVErr vă permite să returna un număr de eroare care vă spune ce acțiune de efectuat.

Rețineți că nu este permis conversie implicită de o eroare . De exemplu, nu puteți atribui direct valoarea returnată de CVErr de o variabilă care nu este o Variant. Cu toate acestea, puteți efectua o conversie explicite (utilizând CInt, CDblși așa mai departe) din valoarea returnată de CVErr și care atribuiți o variabilă corespunzătoare tip de date.

Exemplu

Notă: Exemplele care urmează demonstrează utilizarea acestei funcții într-un modul Visual Basic for Applications (VBA). Pentru mai multe informații despre lucrul cu VBA, selectați Referințe pentru dezvoltatori în lista verticală de lângă Căutare și introduceți unul sau mai mulți termeni în caseta de căutare.

Acest exemplu utilizează funcția CVErr pentru a returna o Variant ale căror VarType este vbError (10). Funcții definite de utilizator CalculateDouble returnează o eroare dacă argumentul a trecut la acesta nu este un număr. Puteți utiliza CVErr pentru a returna erori definite de utilizator din proceduri definite de utilizator sau se amână gestionarea de o eroare la momentul rulării. Utilizați funcția IsError pentru a testa dacă valoarea reprezintă o eroare.

' 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

Notă: Exonerare de răspundere pentru traducere automată: Acest articol a fost tradus de un sistem computerizat, fără intervenție umană. Microsoft oferă aceste traduceri automate pentru a ajuta utilizatorii vorbitori de alte limbi decât engleza să beneficieze de conținutul despre produsele, serviciile și tehnologiile Microsoft. Pentru că articolul a fost tradus de un computer, poate conține erori de vocabular, sintaxă sau gramatică.

Extindeți-vă competențele
Explorați instruirea
Fiți primul care obține noile caracteristici
Alăturați-vă utilizatorilor Office Insider

Au fost utile aceste informații?

Vă mulțumim pentru feedback!

Vă mulțumim pentru feedback! Se pare că ar fi util să luați legătura cu unul dintre agenții noștri de asistență Office.

×