Penanganan Error (Error Handling) adalah bagian yang penting dalam pembuatan sebuah program (software).
Tanpa penanganan Error program anda menjadi tidak ramah (not user friendly). Apa komentar anda pada saat memakai program programnya tertutup dengan tiba-tiba?
Yang pasti anda jadi bingung kok programnya langsung nutup padahal nggak ada niat nutup. Program yang tidak diberi Error Handling (Penanganan Error) pasti punya gelagat seperti itu.
Untuk membuat program yang User Friendly (ramah terhadap pemakai) salah satunya kita harus membuat penanganan Error (Error Handling).
Untuk menangani masalah di atas (software tertutup dengan tiba-tiba) kita harus menambahkan kode penanganan Error (Error Handling) kode di bawah ini adalah kode yang sudah diberikan pananganan Error (Error Handling):
Private Sub Command1_Click()
On Error GoTo TangkapError
Dim iBil As Integer
iBil = 50000
MsgBox iBil
Exit Sub
TangkapError:
MsgBox Err.Description
End Sub
Post a Comment