PERTEMUAN 11 : MATERI EXCEPTION HANDLING

EXCEPTION HANDLING

Mengenal Exception Handling (Penanganan Kesalahan)

Perintah penanganan kesalahan yang sering dikenal dengan istilah

Exception Handling. Perintah ini digunakan untuk menangani suatu kesalahan

dalam menjalankan aplikasi dengan adanya perintah ini setipa kesalahan akan

diatasi secara otomatis sesuai dengan perintah kesalahan yang telah anda buat,

sehingga tidak terjadi kemacetan aplikasi yang sedang berjalan.

Struktur Exception Handling atau penanganan kesalahan di Visual Basic  2008 antara lain :

a. Menggunakan Try...Catch..Finally...End Try

b. Menggunakan Throw

Memahami Penggunaan Try-Catch-Finally-EndTry

Ini merupakan perintah penanganan kesalahan yang berfungsi untuk

menangani kesalahan dalam menjalankan aplikasi. Dengan menggunakan trycatch

ini sanagat memudahkan kita dalam melacak kesalahan yang terjadi

didalam program yang sedang running. Blok Try akan dijalankan jika tidak

adanya kesalahan yang terjadi didalam program yang kita buat. Namun

terjadinya kesalahan didalam program maka akan menyebabkan terjadinya

kesalahan dan runtime error, maka akan dijalankan perintah yang ada didalam

blok catch, tetapi blok catch yang akan dijalankan sesuai juga dengan tipe

kesalahan yang akan kita berikan, sangat banyak tipe kesalahan yang ada didalam

program, misalnya kesalahan secara umum,kita bisa buat dengan tipe Exception,

atau kesalahan database MySQl bisa kita buat MySQLException, dan lain

sebagainya

Bentuk penulisan Try-Catch-Finally-EndTry sebagai berikut :

Try

[Perintah yang akan dijalankan]

Catch nama_variabel As Exception

[Tangkap Kesalahan]

Finally

[Perintah setelah try dan Catch, tetapi ini Optional, Boleh iya

boleh juga tidak dibuat]

EndTry

Contoh penggunaan Didalam Visual Studio 2008 :

Dengan menggunakan perintah try-catch ini sangat meudahkan kita

dalam memanajemen program yang kita buat dan dengan menggunakan perintah

ini kita sangat dibantu dalam mencari kesalahan terhadap program yang dibuat.

Penggunaan Throw

Throw merupakan perintah penanganan kesalahan yang berfungsi untuk

menangani kesalahan apabila perintah Try-Catch-Finally-EndTry tidak dapat

menangani suatu kesalahan jalannya aplikasi :

Contoh Bentuk Penulisan :

Try

[Perintah ]

Catch Ex As Exception

[Tangkap Kesalahan]

ThrowEx/

/ Mengembalikan ke Kode Pemanggil

Finally

[Kode Program setelah Try-Catch]

//Kode ini Optional, Boleh dibuat boleh juga tidak

EndTry

Contoh Penggunaan Pada Visual Basic .Net :

Perintah throw ini hanya digunakan untuk mengembalikan kode ke

pemanggil awalnya, jadi dengan menggunakan perintah ini kesalahan tetap bisa diatasi dan program tidak akan berhenti secara langsung ketika program dijalankan.

Menggunakan Exception Handling

Pada praktek kali ini anda akan coba membuat aplikasi untuk

menentukan bilangan tersebut bilangan ganjil atau genap menggunakan fungsi

penanganan kesalahan:

Desain Form seperti dibawah ini :

a. Buatlah Project dengan nama Exception Handling

b. Form contoh Exception Handling

c. Atur Properties Seperti dibawah ini:

Object	Properties	Name
Form1	Name Text	FormExceptionHandling Exception Handling
OpenFileDialogBuka	Name	OpenFileDialogBuka
PictureBox1	Name	ProcedureFunctionGambar.Image
Button1	Name Text	ButtonBuka Buka
Button2	Name Text	ButtonExit Exit

e. Double Click Button Buka Lalu Ketikkan program seperti berikut ini :

Public Class FormExceptionHandling

    Private Sub ButtonBuka_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonBuka.Click

        If OpenFileDialogBuka.ShowDialog() = Windows.Forms.DialogResult.OK Then

            Try

                ProcedureFunctionGambar.Image = Image.FromFile(OpenFileDialogBuka.FileName)

                Me.Text = "Membuka File" + OpenFileDialogBuka.FileName

            Catch ex As Exception

                MessageBox.Show("File Gagal dibuka", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)

            End Try

        End If

    End Sub

f. Double Click Button Exit Lalu Ketikkan program seperti berikut :

    Private Sub ButtonExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonExit.Click

        Dim Tutup As String

        Tutup = MessageBox.Show("Yakin Tutup Form Ini ?", "Konfirmasi", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

        If Tutup = MsgBoxResult.Yes Then

            End

        Else

            Exit Sub

        End If

    End Sub

End Class

^{Untuk menjalankan program, klik tombol Start Debugging   atau tekan  tombol F5 pada keyboard.}

^{Untuk menutup program, klik tombol Stop Debugging}

g. Jalankan aplikasi dan inputkan data 

Lihat Gambar dibawah ini :

Tekan tombol Buka Lihat Output seperti dibawah ini adalah Pesan Error yang ditampilkan oleh VB Net

Gambar diatas merupakan pesan kesalahan yang dihasilkan karena

yang diminta adalah File gambar dari hasil Exception Handling

 ExceptionHandling              

Desain Form seperti dibawah ini :                                                                                           

        

Atur Properties Seperti dibawah ini:  

Object	Properties	Name
Form2	Name Text	ExceptionHandling Form Exception Handling
TextBox1	Name	TxtAngka
Button1	Name Text	ButtonProses Proses

 

Public Class ExceptionHandling

    Private Sub ButtonProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonProses.Click

        Try

            Dim X As Integer

            X = TxtAngka.Text

            Do

                X = X Mod 2

                If X = 0 Then

                    MessageBox.Show("Bilangan Genap", "Informasi")

                    Exit Do

                ElseIf X = 1 Then

                    MessageBox.Show("Bilangan Ganjil", "Informasi")

                    Exit Do

                End If

            Loop While Not X

        Catch ex As Exception

            MsgBox("Salah Menginputkan Data Input Angka")

        Finally

            TxtAngka.Text = ""

            TxtAngka.Focus()

        End Try

    End Sub

End Class