Penggunaan Try Catch Finally di VB.NET dan C#

Setelah beberapa hari yang lalu saya memposting tentang Validasi URL dengan VB.NET dan C#, pada malam hari ini saya akan membahas tentang Penggunaan Try Catch Finally di VB.NET dan C#, terkadang ketika kita membuat sebuah program kita sering mengalami error dalam menjalankan program itu dan kita ingin menangkap kesalahan tersebut,, dengan Try Catch kita bisa menangkap kesalahan itu serta kita juga bisa memunculkan deskripsi dari kesalahan tersebut

Bentuk umum penulisan Try Catch
VB.NET
Try
' Block program yang akan dijalankan
Catch ex As Exception
' Block yang akan dijalankan jika terjadi kesahalan
Finally
' Block yang akan dijalankan di akhir
End Try
C#
try
{
// Block program yang akan dijalankan
}
catch
{
// block yang akan dijalankan jika terjadi kesalahan
}
finally
{
// block yang akan dijalankan di akhir
}

Untuk lebih jelasnya anda bisa mencoba script dibawah ini
VB.NET
Try
' mengubah cursor menjadi waitcursor
Me.Cursor = Cursors.WaitCursor
' membuat jeda selama 2 detik
System.Threading.Thread.Sleep(2000)

' mendeklarasikan nilai yang akan dikalikan
Dim nilai1 As Integer = CInt(textBox1.Text)
Dim nilai2 As Integer = CInt(textBox2.Text)

' menghitung perkalian antara 2 nilai tersebut
Dim hasil As Integer = nilai1 * nilai2
' menampilkan hasil perkalian ke textbox3
textBox3.Text = hasil.ToString()
Catch ex As Exception
' memunculkan pesan error
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
Finally
' mengubah cursor menjadi default
Me.Cursor = Cursors.Default
End Try
C#
try
{
// mengubah cursor menjadi waitcursor
Cursor.Current = Cursors.WaitCursor;
// membuat jeda selama 2 detik
System.Threading.Thread.Sleep(2000);

// mendeklarasikan nilai yang akan di kalikan
int nilai1 = Convert.ToInt16(textBox1.Text);
int nilai2 = Convert.ToInt32(textBox2.Text);

// menghitung perkalian antara 2 nilai tersebut
int hasil = nilai1 * nilai2;
// menampilkan hasil perkalian ke textbox3
textBox3.Text = hasil.ToString();
}
catch (Exception ex)
{
// Memunculkan pesan error
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
finally
{
// mengubah cursor menjadi default
Cursor.Current = Cursors.Default;
}

Jalankan program tersebut dengan menekan F5

Penggunaan Try Catch Finally di VB.NET dan C#
Program dijalankan dengan lancar
Penggunaan Try Catch Finally di VB.NET dan C#
Program dijalankan dan terjadi error 
Anda dapat mendownload source codenya dibawah ini
| VB.NET | C# |
Untuk password silahkan klik disini

Sekian dari saya.
Terima kasih atas kunjugannya semoga bermanfaat

Tidak ada komentar

Diberdayakan oleh Blogger.