Tips Coding Interfacing POrt USB & port Serial " GO TO "

==========

GO TO

===========

perintah goto di gunakan untuk melakukan pencabangan ke suatu baris label tertentu,Dengan perintah GO TO,program dapat langsung melompat ke baris tertentu sehingga code-code program yang dilewatinya tidak akan dieksekusi,syntax penulisannya sebagai berikut:

GoTo <nama_label>

      <blok pernyataan>

<nama_label>:

 Biasanya perintah GoTo digunakan bersama dengan perintah On Error untuk menangani Error,yaitu memerintahkan program melompat ke baris tertentu jika di temui Error , Error dapat terjadi karena kesalahan logika program disebabkan oleh hardware,maupun kesalahan lainnya. Penanganan error dalam program adalah sangat penting karena adanya error ini dapat menyebabkan program menjadi berhenti dan dapat menyebabkan komputer menjadi hang.

Syntax penulisan sebagai berikut;

On Error GoTo <nama_label>

   <blok pernyataan>

<nama_label>:

 Berikut adalah contoh program penanganan kesalahan pada program pembagian angka. Program akan meminta angka yang akan dibagi dan angka pembagiannya,kemudian menampilkan hasilnya. Jika terjadi Error, misal pembagian dengan Nol yang menghasilkan angka tak terhingga atau kesalahan masukan berupa huruf maka akan ditampilkan pesan kesalahan. 

Berikut code programnya :

private Sub Form_Load ()

on Error GoTo Error_handle

input_angka% = InputBox ("Masukkan angka yang akan dibagi ", "Masukkan angka pembaginya")

hasil% = input_angka% / input_pembagi%

MsgBox hasil%, vbOKOnly, "Hasil pembagian"

GoTo sukses

Error_handle:

MsgBox "telah terjadi kesalahan",vbOKOnly, "error"

sukses:

End Sub