Funkcja Error Funkcja Error Funkcja Error zwraca komunikat błędu o podanym numerze. Składnia funkcji Error: Error[(NrBłędu)] Argument NrBłędu jest opcjonalnym poprawnym numerem błędu. Jeżeli NrBłędu jest poprawnym numerem błędu lecz nie jest zdefiniowany, funkcja Error zwróci łańcuch "Application-defined or object-defined error". Jeżeli NrBłędu nie jest poprawną wartością, powstanie błąd. Jeżeli NrBłędu zostanie pominięty zostanie zwrócona wiadomość odpowiednia dla najczęściej występujących błędów uruchomieniowych (run-time error). Jeżeli nie ma błędów run-time lub NrBłędu ma wartość 0, funkcja Error zwróci łańcuch o zerowej długości (""). Przykład użycia funkcji Error: Dim varNrBledu As Variant For varNrBledu=1 To 1000  'pętla od 1 do 1000  If Error(varNrBledu)<>"Application-defined or object-defined error" Then   'jeżeli błąd jest zdefiniowany to   Text1=Text1 & Str(varNrBledu) & " - " & Error(varNrBledu)    'dodaj numer i kod błędu do kontrolki TextBox   Text1=Text1 & Chr(13) & Chr(10)    'dodaj znak nowej linii do kontrolki TextBox  End If Next varNrBledu  'następny numer błędu (Zmienne, typy zmiennych, rozkazy For i If, funkcje Chr i Str, kontrolka TextBox i właściwość Text zostały opisane w innych częściach kursu.) W przykładzie licznik pętli (od 1 do 1000) jest przekazywany do funkcji Error. Jeżeli zwrócony przez nią komunikat jest inny niż "Application-defined or object-defined error", co oznacza, że błąd jest zdefiniowany, zostaje on dodany do właściwości Text kontrolki TextBox. Po wykonaniu pętli w kontrolce TextBox znajdują się numery i komunikaty zdefiniowanych błędów o numerach od 1 do 1000. Kontrolka TextBox powinna nazywać się Text1 i mieć właściwość MultiLine ustawioną na True oraz właściwość ScrollBars ustawioną na Both. na górę strony... Poprzednia | Wyżej | Strona główna | Spis Treści | Index haseł | Opis VB