Exception Handling

EXCEPTION HANDLING

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


Throw

Throw merupaka 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



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”)

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”)


Contoh Program Exception Handling

Object
Properties
Nilai
Form1
Name
Text
Form1
Aplikasi Buka Gambar
OpenFileDialog1
Text
ofdBuka
PictureBox1
Name
PcbGambar
Button1
Name
Text
BtnBuka
Buka
Button2
Name
Text
BtnExit
Exit


Gambar 1.1 Tampilan Desain Program

Kode Program

 Public Class Form1

    Private Sub BtnBuka_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnBuka.Click
        If ofdBuka.ShowDialog() = Windows.Forms.DialogResult.OK Then
            Try
                PcbGambar.Image = Image.FromFile(ofdBuka.FileName)
                Me.Text = "Membuka File" + ofdBuka.FileName
            Catch ex As Exception
                MessageBox.Show("File Gagal dibuka", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            End Try
        End If
    End Sub

    Private Sub BtnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnExit.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


Gambar 1.2 Tampilan Hasil Program


Contoh Program

Gambar 1.3 Tampilan Desain Program


Kode Program

Public Class Form2

    Private Sub BtnProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnProses.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 menginput data / input angka")
        Finally
            TxtAngka.Text = ""
            TxtAngka.Focus()
        End Try
    End Sub
End Class


Gambar 1.4 Tampilan Hasil Program

Komentar

Posting Komentar

Postingan populer dari blog ini

Menu Bar dan Main From

Gambar
MENU BAR dan MAIN FROM Menubar            Menubar adalah balok yang berisi menu yang akan digunakan untuk mengeksekusi perintah dalam suatu sistem informasi. Menu Strip               Untuk membuat menu pada form kita dapat menggunakann komponen pada ToolBox berupa MenuStrip, biasanya menu digunakan untuk akses fitur-fitur dari aplikasi yang kita buat dan ditempatkan pada form utama suatu progra. Bayangkam jika fitur yang kita buat dalam sebuah program begitu banyak dan kompleks, maka tidak mungkin bagi kita menggunakan control berupa Button atau sejenisnya kedalam tubuh Form karena akan memperjelek tampilan dari Form utama itu sendiri. Untuk menagtasi hal tersebut maka kita dapat mengunakan komponen MenuStrip untuk menampilkan semua fitru dengan tampilan dorpdown menu dari bagian atas form. Membuat Garis Batas Antar SubMenu -   Klik tanda panah pada Type Here -  Pi...
Baca selengkapnya

Procedure, Function dan Module

Gambar
PROCEDURE, FUNCTION DAN MODULE Sejauh ini, anda telah menuliskan sub procedure yang dibuat secara otomatis pada saat menggunakan event . Sub procedure merupakan blok kode yang mempunyai nama dan berisi perintah yang dapat dipanggil suatu waktu. Artinya, hanya sekali dibuat yang kemudian di panggil berkali-kali sesuai dengan kebutuhan . Bentuk Umum : [Private|Public] Sub subname[(argumentlist)]       Statements End sub Sub Procedure dapat dipanggil dengan perintah : [call] subname[(argumentlist)] Keterangan : Sub procedure ( Procedure) sebaiknya menggunakan kata kerja (verb) Pemanggilan procedure yang masih dalam satu kelas (class) atau modul (module) dapat dilakukan dengan kata kunci Me. Procedure dapat menerima argument melalui nilai (by value) atau juga reference (by reference).Jika menggunakan by value, nilai pada argument tidak berubah.Sedangkan jika menggunakan by reference, nilai argument yang digunakan dapat berubah sesu...
Baca selengkapnya