- Home>
- Setelah UTS 3 >
- Exception Handling pada Visual Basic
Jumat, 03 Agustus 2018
Assalamualaikum, Apasih sih itu Exception Handling? Bingung simak aja artikel yang saya tulis dibawah ini. Selamat Membaca ya :D
EXCEPTION
HANDLING
Perintah penanganan kesalahan atau yang lebih
dikenal dengan sebutan Exception Handling Perintah ini digunakan untuk
menangani kesalahan dalam menjalankan aplikasi, dengan adanya perintah ini
setiap kesahan akan diatasi secara otamatis sesuai dengan perintah penanganan
kesalahan yang telah dibuat, sehingga tidak terjadi kemacetan aplikasi yang
sedang berjalan.
Struktur
Exception Handling
Struktur Exception Handling atau penanganan kesalahan
pada visual basic 2008 antara lain :
Try … Catch …
Finally … End Try
Merupakan perintah penanganan kesalahan yang
berfungsi untuk menangani kesalahan dalam menjalankan aplikasi.
Bentuk penulisan :
Try
[ Perintah ]
Catch
[Tampilkan kesalahan]
Finally
[ Kode program setelah perintah Try dan Catch ]
End
Try
Try, Catch, Finally dan Throw.
§ Try : mengidentifikasi blok kode
yang berisi kode-kode tertentu yang diharapkan untuk dilaksanakan oleh
program atau aplikasi. Blok Try diikuti oleh satu atau lebih blok
Catch.
§ Catch : Saat terjadi kesalahan pada blok
Try, maka blok ini akan menangkap kesalahan dengan yang isinya biasanya
menampilkan pesan tertentu atau menuju ke blok lain untuk mengeksekusi
perintah yang diinginkan. Kata kunci Catch menunjukkan penangkapan
pengecualian.
§ Finally : blok ini digunakan untuk
menjalankan satu set pernyataan, apakah eksepsi dilemparkan atau tidak.
Misalnya, jika kita membuka file, itu harus ditutup apakah eksepsi
dimunculkan atau tidak, atau saat operasi dengan database pada blok ini
ditambahkan perintah untuk menutup koneksi yang telah dibuka pada blok Try.
§ Throw : Suatu program melempar
pengecualian ketika masalah muncul. Hal ini dilakukan dengan menggunakan kata
kunci Throw.
Try
'Kode-kode
yang diharapkan dalam suatu proses disimpan disini
Catch ex as
Exception
'Kode-kode
jika terjadi kesalahan dalam blok diatas disimpan disini.
Messagebox.Show(ex.Message)
Finally
'Kode-kode
untuk melakukan sesuatu jika terjadi exception atau tidak. Kode-kode pada blok
ini pasti dijalankan.
End Try
Contoh :
Try
Dim X%
X = TxtAngka.Text
Catch ex As Exception
MsgBox(ex.ToString)
MsgBox(“Input angka saja”)
Finally
TxtAngka.Text=””
TxtAngka.Focus()
End Try
Dim X%
X = TxtAngka.Text
Catch ex As Exception
MsgBox(ex.ToString)
MsgBox(“Input angka saja”)
Finally
TxtAngka.Text=””
TxtAngka.Focus()
End Try
Throw
Throw merupakan perintah penanganan kesalahan yang
berfungsi untuk menangani kesalahan apabila perintah try…catch … Finally … End.
Try tidak dapat menangani suatu kesalahan dari jawaban aplikasi.
Contoh penulisan :
Try
[ Perintah ]
Catch
ex As Exception
[Tampilkan kesalahan]
Throw
ex
// mengembalikan ke kode pemanggil
Finally
[ Kode program setelah perintah Try dan
Catch ]
Perintah ini bersifat optional bias dibuat
bias tidak
End
Try
Contoh :
Try
Dim X%
X = TxtAngka.Text
Catch ex As Exception
MsgBox(ex.ToString)
MsgBox(“Input angka saja”)
Throw ex
Finally
TxtAngka.Text=””
TxtAngka.Focus()
End Try
Dim X%
X = TxtAngka.Text
Catch ex As Exception
MsgBox(ex.ToString)
MsgBox(“Input angka saja”)
Throw ex
Finally
TxtAngka.Text=””
TxtAngka.Focus()
End Try
On Error Resume
Next
Merupakan perintah penanganan kesalahan apabila
terjadi kesalahan terhadap suatu baris tertentu maka baris tersebut akan di
abaikan.
Contoh :
On
Error Resume Next
Dim A As Integer
X = TextBox1.Text
TextBox1.Text=”String”
MsgBox(ex.ToString)
MsgBox(“Abaikan Kesalahan”)
Dim A As Integer
X = TextBox1.Text
TextBox1.Text=”String”
MsgBox(ex.ToString)
MsgBox(“Abaikan Kesalahan”)
On Error Goto
Merupakan perintah penanganan kesalahan apabila
terjadi kesalahan terhadap suatu baris tertentu maka perintah akan melompat ke
baris yang dituju akan dijalankan.
Contoh :
On Error Goto Pesan
Dim A As Integer
X = TextBox1.Text
TextBox1.Text=”String”
Exit Sub
Pesan :
MsgBox(“Abaikan Kesalahan”)
Dim A As Integer
X = TextBox1.Text
TextBox1.Text=”String”
Exit Sub
Pesan :
MsgBox(“Abaikan Kesalahan”)