Pemrograman Visual:Exception Handling - Revision history

Kangtain: /* Praktikum */

2022-12-18T23:25:33Z

Praktikum

← Older revision		Revision as of 06:25, 19 December 2022
Line 92:		Line 92:

	* Buat project baru, dengan nama Prak12.		* Buat project baru, dengan nama Prak12.
	* Desain Tampilan form seperti gambar berikut ini :		* Desain Tampilan form seperti gambar berikut ini:
			[[File:Pemrograman Visual Exception Handling 48598103.png\|center\|thumb\|279x279px]]
	* Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut:		* Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut:
	{\| class="wikitable"		{\| class="wikitable"
Line 162:		Line 163:
	* Tambahkan Form baru, dengan nama Form2.		* Tambahkan Form baru, dengan nama Form2.
	* Desain Tampilan form seperti gambar berikut ini:		* Desain Tampilan form seperti gambar berikut ini:
			[[File:Pemrograman Visual Exception Handling 8678594.png\|center\|thumb\|251x251px]]
	* Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut:		* Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut:

Kangtain: /* Latiahan 1 */

2022-12-03T07:19:13Z

Latiahan 1

← Older revision		Revision as of 14:19, 3 December 2022
Line 94:		Line 94:
	* Desain Tampilan form seperti gambar berikut ini :		* Desain Tampilan form seperti gambar berikut ini :
	* Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut:		* Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut:
			{\| class="wikitable"
			\|+
			!Object
			!Properties
			!Nilai
			\|-
			\| rowspan="2" \|Form1
			\|Name
			\|Form1
			\|-
			\|Text
			\|Aplikasi buka gambar
			\|-
			\|OpenFileDialog1
			\|Text
			\|ofdBuka
			\|-
			\|PictureBox1
			\|Name
			\|PcbGambar
			\|-
			\| rowspan="2" \|Button1
			\|Name
			\|BtnBuka
			\|-
			\|Text
			\|Buka
			\|-
			\| rowspan="2" \|Button2
			\|Name
			\|BtnExit
			\|-
			\|Text
			\|Exit
			\|}

			* Klik ganda pada Tombol Buka, kemudian ketik kode program berikut ini :
			<syntaxhighlight lang="vbscript" line="1">
			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
			</syntaxhighlight>

			* Klik ganda pada tombol BtnExit, Kemudian ketikkan kode program berikut ini:
			<syntaxhighlight lang="vbscript" line="1">
			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
			</syntaxhighlight>

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

			=== Latihan 2 ===

			* Tambahkan Form baru, dengan nama Form2.
			* Desain Tampilan form seperti gambar berikut ini:
			* Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut:

			{\| class="wikitable"
			\|+
			!Object
			!Properties
			!Nilai
			\|-
			\| rowspan="2" \|Form1
			\|Name
			\|Form1
			\|-
			\|Text
			\|Penanganan Kesalahan
			\|-
			\|TexBox1
			\|Name
			\|TxtAngka
			\|-
			\| rowspan="2" \|Button1
			\|Name
			\|BtnProses
			\|-
			\|Text
			\|Proses
			\|}

			* Double klik pada tombol BtnProses, kemudian ketik kode Program berikut ini:
			<syntaxhighlight lang="vbscript" line="1">
			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
			</syntaxhighlight>

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

			[[Category:Materi]]
			[[Category:Matkul]]
			[[Category:Pemrograman Visual]]

Kangtain: Created page with "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..."

2022-11-30T11:36:54Z

Created page with "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..."

New page

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 :<syntaxhighlight lang="vbscript">
Try
[ Perintah ]
Catch
[Tampilkan kesalahan]
Finally
[ Kode program setelah perintah Try dan Catch ]
End Try
</syntaxhighlight>

==== Contoh ====
<syntaxhighlight lang="vbscript">
Try
Dim X%
X = TxtAngka.Text
Catch ex As Exception
MsgBox(ex.ToString)
MsgBox(“Input angka saja”)
FinallyTxtAngka.Text=””
TxtAngka.Focus()
End Try
</syntaxhighlight>

=== Throw ===
Throw merupaka perintah penanganan kesalahan yang berfungsi untuk menangani kesalahan apabila perintah <code>try…catch … Finally … End.</code> <code>Try</code> tidak dapat menangani suatu kesalahan dari jawaban aplikasi.

Contoh penulisan:<syntaxhighlight lang="vbscript">
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
</syntaxhighlight>

==== Contoh ====
<syntaxhighlight lang="vbscript">
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
</syntaxhighlight>

=== On Error Resume Next ===
Merupakan perintah penanganan kesalahan apabila terjadi kesalahan terhadap suatu baris tertentu maka baris tersebut akan di abaikan.

==== Contoh ====
<syntaxhighlight lang="vbscript">
On Error Resume Next
Dim A As Integer
X = TextBox1.Text
TextBox1.Text=”String”
MsgBox(ex.ToString)
MsgBox(“Abaikan Kesalahan”)
</syntaxhighlight>

=== 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 ====
<syntaxhighlight lang="vbscript">
On Error Goto Pesan
Dim A As Integer
X = TextBox1.Text
TextBox1.Text=”String”
Exit Sub
Pesan :
MsgBox(“Abaikan Kesalahan”)
</syntaxhighlight>

== Praktikum ==

=== Latiahan 1 ===

* Buat project baru, dengan nama Prak12.
* Desain Tampilan form seperti gambar berikut ini :
* Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut: