Funkcja CVErr

Uwaga:  Staramy się udostępniać najnowszą zawartość Pomocy w Twoim języku tak szybko, jak to możliwe. Ta strona została przetłumaczona automatycznie i może zawierać błędy gramatyczne lub nieścisłości. Chcemy, aby ta zawartość była dla Ciebie przydatna. Prosimy o powiadomienie nas, czy te informacje były pomocne, u dołu tej strony. Oto angielskojęzyczny artykuł do wglądu.

Zwraca wariant podtypu o błędzie zawierający numer błędu określony przez użytkownika.

Składnia

CVErr ( numer_błędu )

Wymagane numer_błęduargument jest dowolnym prawidłowym numerem błędu.

Uwagi

Funkcja CVErr do tworzenia zdefiniowanych przez użytkownika błędów w procedury utworzone przez użytkownika. Na przykład jeśli utworzysz funkcji akceptuje kilka argumenty, które zwykle zwraca ciąg, możesz mieć funkcja argumenty wejściowe mieć pewność, że są one dopuszczalnego zakresu. Jeśli nie są one, prawdopodobnie funkcja nie zwróci, czego można oczekiwać. W takim przypadku CVErr pozwala zwrócić numer błędu informujący o jakie czynność.

Zauważ, że jawna konwersja błędu nie jest dozwolone. Na przykład, nie można bezpośrednio przypisać wartość zwróconą przez funkcję CVErrzmienna, która nie jest typu Wariant. Jednak można wykonywać jawna konwersja (za pomocą CInt, CDbli tak dalej) wartość zwracana przez funkcję CVErr i przypisać do zmiennej odpowiedniego typ danych.

Przykład

Uwaga: Poniższe przykłady przedstawiają sposób użycia tej funkcji w module języka Visual Basic for Applications (VBA). Aby uzyskać dodatkowe informacje na temat pracy w języku VBA, wybierz pozycję Dokumentacja dewelopera z listy rozwijanej obok przycisku Wyszukaj i wprowadź odpowiednie terminy w polu wyszukiwania.

W tym przykładzie funkcja CVErr zwraca Wariant którego VarType jest vbError (10). Jeśli przekazany jej argument nie jest liczbą, funkcja zdefiniowana przez użytkownika CalculateDouble zwraca błąd. Za pomocą CVErr zwraca błędy zdefiniowane przez użytkownika z procedury zdefiniowane przez użytkownika lub do opóźniania obsługi błąd wykonania. Aby sprawdzić, czy wartość reprezentuje błąd, należy użyć funkcji 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
Rozwijaj umiejętności związane z pakietem Office
Poznaj szkolenia
Uzyskuj nowe funkcje w pierwszej kolejności
Dołącz do niejawnych testerów pakietu Office

Czy te informacje były pomocne?

Dziękujemy za opinię!

Dziękujemy za opinię! Wygląda na to, że połączenie Cię z jednym z naszych agentów pomocy technicznej pakietu Office może być pomocne.

×