LastError

Programların çalışması sırasında(Run-Time) meydana gelebilecek hataların kontrol edilmesini sağlayan bir fonksiyondur. Kullanımı

Function LastError() As Number

Parametreler Herhangi bir parametresi yoktur. Geri Dönüş Değeri Geri dönüş değeri hatanın oluşması durumunda, ilgili hataya karşılık gelen sayısal bir değerdir. Dikkat Edilecek Hususlar Dönüş değeri sayısal olan bu fonksiyon, herhangi bir Run-Time hatası oluştuğu taktirde yapılacak işlemler için tanımlanabilir. Aşağıdaki tabloda ise hatalar ve karşılık gelen hata kodları verilmiştir:

Bilinmeyen Metod

1

Bilinmeyen Özellik

2

Hatalı <Metod / Özellik> dönüş tipi

3

Hatalı Özellik tipi

4

Yeterli Hafıza Yok

5

Salt Okunabilir Özellik

6

Metodun Parametre Sayısı Yanlış

7

Metodun Parametresinin Tipi Yanlış

8

Salt Yazılabilir Özellik

9

Nesneye İlk Değer Verilmemiş

10

Dizinin Sınırları Aşıldı

11

Bilinmeyen Hata

99

Örnek

  Dim hata As Number
  Dim a As Object
  a.hesapla()
  hata:= LastError()
  If hata <> 0 Then
    MessageBox("Hata Oluştu.",     "UYARI",MB_OK+MB_ICONEXCLAMATION)
  EndIf

Örnek Açıklaması Burada a nesnesinin "hesapla" şeklinde bir metodu kullanılmaya çalışılıyor. Fakat böyle bir metod daha önceden tanımlı olmadığından hata değişkeninin değeri "1" olur. Sonuç olarak ise "0" dan farklı bir değer için ekrana "Hata Oluştu" uyarı mesajı gelmektedir.

Last updated