(VB.NET) Error Trapping Part 1 - Try Catch End Try

Apa sih Error Trapping itu..??
Error Trapping adalah proses yang digunakkan untuk mengalihkan proses yang didalamnya terdapat run-time error ke proses lain agar program tidak berhenti secara tidak wajar bahkan menjadi "Hang".
Error bisa saja terjadi karena kesalahan manusia / user. Seperti contohnya seharusnya data yang diinput dalam bentuk angka(Integer)  tetapi user menginputnya dalam bentuk huruf (Char,String).

Salah satu trik untuk mengalihkan kesalahan program agar program tidak hang saat dijalankan adalah dengan menggunakan pernyataan Try..Catch..End Try.

1. Buat Form seperti dibawah ini. Form ini adalah form untuk mengkonversikan ukuran panjang Meter menjadi Centimeter .Form ini akan melakukan proses penghitungan. Jadi yang akan diproses adalah inputan yang berbentuk angka selain dari angka program akan error.
   
   
   
   
   
2. Double Klick Button Proses. Ketikan code berikut pada Button Proses

   
   

   'code Untuk Button Proses

       Private Sub BtnProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnProses.Click 

           Try
               Dim Hasil As Integer
               Dim Nilai As Integer
   
               Nilai = 100
               Hasil = Nilai * TextBox1.Text
   
               MessageBox.Show("Hasil Konversi ukuran " & TextBox1.Text & "Meter, Menjadi Centimeter = " & Str(Hasil) & "Centimeter", "PesanKu") 

           Catch salah As Exception
               MsgBox(salah.Message) 

           End Try
       End Sub
   

3. Run form yang telah dibuat dan lakukan perintah :
   
   1. Isi TextBox dengan angka (Integer)
   2. Isi TextBox dengan huruf (Char,String)
    
4. Perintah Pertama Form akan berjalan sesuai dengan Fungsinya
   
   
   
   
   
   Pada perintah ke-2 maka proses akan Erorr karena pemrosesan tidak berjalan dengan benar dan perintah Try..Catch..End Try akan menjalankan tugasnya.