Rabu, 19 Desember 2012

Penanganan Error pada VB.Net

Fungsi penanganan Error Wajib kita terapkan pada Aplikasi yang kita buat, Supaya bisa mencegah adanya Bug/Runtime Error pada Aplikasi yang kita buat.
Fungsi ini layaknya penutup kesalahan pada Aplikasi.
Di Visual Basic.NET sendiri telah menambahkan Script2 baru untuk menangani Runtime Error, Contoh :



On Error Goto :
Code ini berfungsi bila terjadi kesalahan pada komputer atau faktor lain di luar  aplikasi, Bukan karna kesalahan Script.
Misal : Sebuah Aplikasi di wajibkan untuk Open Close Optic Driver yang ada di komputer si User , Sedangkan pada komputer tersebut tidak ada Optic Driver yang terditeksi, Maka Aplikasi tentunya akan Error dan code tersebut untuk menangani itu code ini juga ada pada Visual Basic.6.0

Contoh Code :



__________________________________________________________________________________________________________

On Error Resume Next   : Code ini berfungsi bila pada Script yang kita tulis terdapat kesalahan dan code ini akan mengabaikan kesalahan tersebut dan melewatinya menuju ke Script yang berjalan lanjar.
code ini juga ada pada Visual Basic.6.0

Contoh Code :

code ini adalah code ngawur, jadi pasti akan terjadi kesalahan, Tetapi itu tidak akan terjadi karena ada kode On Error Resume Next

 On Error Resume Next
        If TextBox1.Text = "12345678" Then
            PictureBox1.Top
        End If
__________________________________________________________________________________________________________


Try Catch              : Code ini berfunsi sama seperti "On Error Goto", Hanya saja ini lebih mudah di gunakan

Contoh Code :

Code ini berfungsi untuk menghapus COBAKEY pada daftar Registry, Tapi saat akan di hapus COBAKEY tidak ada..Maka pesan Error'pun muncul "Maaf..COBAKEY tidak ada pada Registry-LocalMachine-Software"


Try
            Dim regKey As RegistryKey
            regKey = Registry.LocalMachine.OpenSubKey("SOFTWARE", True)
            regKey.DeleteSubKeyTree("COBAKEY")
            Catch ex As Exception
            MsgBox("Maaf..COBAKEY tidak ada pada Registry-LocalMachine-Software")
            End Try

Tulisan saya mungkin kurang jelas atau banyak salahnya, Tolong di maklumi, Karna saya juga masih NewBie tentang VB.NET.
Mohon bantuanya jika ada yang salah pada tulisan saya, dengan cara memberikan komentar pada Artikel ini...Terima kasih

0 komentar:

Posting Komentar

Setelah melihat - lihat, Alangkah baiknya memberikan komentar mengenai Blog ini.
Kritik dan Saran teman-teman semua, Saya anggap sebagai masukan buat saya... terima kasih telah berkunjung