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

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

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

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

Membuat project Baru

1                Desain Tampilan form seperti gambar berikut ini :

       Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut:

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

2.      Klik ganda pada Tombol Buka, kemudian ketik kode program berikut ini :

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

3.      Klik ganda pada tombol BtnExit, Kemudian ketikkan kode program berikut ini :

        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

4.      Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui icon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging.

5

  

Procedure, Function dan Module

Procedure, Function dan Module

1.Procedure

*Prosedur adalah sebuah blog kode program yang akan mengerjakan perintah-perintah. Jika di dalam program yang akan dibuat terdapat beberapa perintah yang akan mempunyai tugas atau fungsi yang sama maka kita dapat membuat sebuah prosedur atas perintah tersebut. Dan prosedur tersebut dapat dipanggil jika diperlukan.

*Fungsi dibuatkan sebuah prosedur adalah dapat menghemat penulisan kode program karena perintah-perintah yang begitu banyak tetapi mempunyai fungsi yang sama dapat dibuat dalam satu bagian saja. Jika terjadi kesalahan dapat dengan mudah dicari kesalahan kemudian dilakukan perbaikan.

*Beberapa macam jenis prosedur :

Procedure Sub, prosedur yang tidak mengembalikan nilai setelah tugasnya selesai

Procedure Function, prosedur yang mengembalikan nilai setelah tugasnya selesai

Procedure Event, prosedur untuk suatu event pada sebuah object. Dan digunakan dalam sebuah class module

Procedure Property, prosedur untuk mengubah (let) atau mengambil (get) nilai property pada sebuah object. Dan digunakan dalam sebuab class module

Bentuk penulisan (syntax) procedure sub,

[public|private]Sub<nama_sub>(|<argument>|)
       .....
       <kode prosedur atau statements>
       .....
End Sub

Sub Procedur dapat dipanggil dengan perintah:

[Call] nama_sub (|argument|)

Bentuk penulisan (syntax) procedure function,

[public|private]Function<nama_function>(|<argument>|) As <tipe_data>
      .....
      <kode prosedur>
      .....
End Function

Pernyataan [public|private] menyatakan ruang lingkup (scope) kerja prosedur. Jika prosedur tersebut berada pada scope public berarti digunakan dalam lingkup project.

.   1.    Membuat project baru,

2 2. .Desain Tampilan form seperti gambar berikut ini :

3.      Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut:

 4.   Kita klik ganda pada form, kemudian kita ketikkan Sub Procedur Bersih:

Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui icon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging

2.FUNCTION

Function adalah bagian dari prosedur dimana function berfungsi untuk mengembalikan nilai dan penggunaannya menggunakan bentuk sintaks khusus dalam bahasa pemrograman VB.Net. Function secara Opsional menerima satu atau lebih parameter yang disebut juga parameter formal.

Karena function bagian dari prosedur maka kita harus tau apa itu prosedur. Prosedur adalah sekelompok pernyataan yang bersama-sama melakukan tugas saat dipanggil, setelah prosedur dijalankan, kontrol akan kembali ke pernyataan yang memanggil prosedur VB.Net. Prosedur dibagi menjadi dua bagian yaitu :

Function

Sub procedure atau Sub

Keuntungan mengunakan Function dan Prosedur di VB:

•Terkadang karena banyaknya sintaks program kita suka ouble-double membuat perintah dalam program, nah untuk mengatasinya biar tidak double-double dan tidak berulang-ulang menulis sintaks maka sebaiknya gunakan Fuction atau prosedure agar tidak duplikasi sintaks.

•

•Memperkecil masalah-masalah yang kompleks dalam program.

•

•Perintah atau sintaks anda jadi mudah di baca

•

•Punulisan kode program jadi semakin jelas.

•

•Informasi kode tersembunyi Kode bisa di pakai berulang kali dalam sebuah progam.

 Definisi Function dalam program VB

Function digunakan untuk mendeklarasikan sebuah nama, parameter dan kode yang menentukan prosedur function. Berikut ini sintaks untuk function yaitu :

[Modifers] Function Function Name [ParameterList] As ReturnType

[Statements]

[Exit Function]

[Statements]

End Function

Keterangan :

•Modifiers : Ini untuk menentukan hak akses atau level dimana kita bisa menentukan sendiri hak akses seperti apa, contoh : Public, Private, Protected, Friend, Protected Friend dan lain-lain.

•FunctionName : Ini untuk mengidentifikasi nama dari function.

•ParameterList : spesifik dari parameter yang digunakan.

•ReturnType : Untuk menentukan tipe data dari variabel function return.

3.  Module (Modul)

Modul merupakan bagian yang sengaja dipisahkan untuk memudahkan pemrograman. Dalam module dapat dimasukkan procedure dan fungsi dan kemudian digunakan oleh beberapa form.

-          Umumnya modul dideklarasikan secara public (public) agar dapat digunakan di dalam kode dimanapun

-          Modul dapat diisi dengan main procedure yang akan dijalankan pertama kali saat program dimulai

-          Modul merupakan salah satu argumentasi code  reuse yang bertujuan agar program lebih efesien.

Sintaks pembuatan modul sebagai berikut :

Module moduleName

      Statement

End module

Contoh :

Module Module

    Public intResponce, RoleId, Msg As Integer

    Public Username, Password, Nama As String

End Module

Pada Visual basic  menyediakan module yang dapat digunakan untuk fungsi, subrutin, konstanta, variabel, dan tipe ciptaan yang akan disediakan bagi keseluruhan project. Untuk module dalam  project anda dapat menggunakan perintah Project > Add Module

Untuk melakukan penulisan kode program , anda dapat melakukan klik ganda pada module

  Mengisi module dengan variable atau fungsi