LATIHAN VISUAL BASIC 1

BUATLAH PROGRAM UNTUK MENENTUKAN:
A. BILANGAN GANJIL ATAU GENAP
B. LULUS ATAU GAGAL (KRITERIA : >=70="LULUS" ; <70 ="GAGAL")

JAWABAN:
A. PROGRAM UNTUK MENENTUKAN BILANGAN GANJIL ATAU GENAP

Langkah-langkah:
1. bukalah aplikasi vb6
2. setelah itu akan muncul tampilan sebagai berikut:

 3. pilih standard exe kemudian klik open
 4. design program yang ingin anda buat sperti berikut:

5. kemudian klik dua kali pada command1(ok) dan isi kan kode sebagai berikut:
Private Sub Command1_Click()
If Val((Text1.Text) Mod 2) = 0 Then
Text2.Text = "GENAP"
Else
Text2.Text = "GANJIL"
End If
End Sub
6. kemudian klik dua kali pada command2(delete) dan isi kan kede sebagai berikut:
Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
End Sub
7. kemudian klik dua kali pada command3(exit) kemudian isi kan kode sebagai berikut:
Private Sub Command3_Click()
End
End Sub

8. sehingga kode yang anda buat menjadi sebagai berikut:

9. kemudian tekan tombol run pada bagian toolbar dan lihat apakah program anda berjalan sesuai keinginan anda.

Berikut adalah tampilan program yang anda buat:

10. selesai deh. selamat mencoba

B.PROGRAM UNTUK MENENTUKAN LULUS ATAU GAGAL

Langkah-langkah:

1. buka aplikasi vb6

2. maka akan muncul tampilan sebagai berikut:

3. pilih standard exe lalu klik open

4. kemudian desain tampilan program anda sebagai berikut:

5. klik dua kali pada bagian command1(ok) kemudian isikan script dibawah ini:

Private Sub Command1_Click()

If Val(Text1.Text) >= 70 Then

Text2.Text = "LULUS"

Else

Text2.Text = "GAGAL"

End If

End Sub

6. klik dua kali pada bagian command2(delete) kemudian isikan script dibawah ini:

Private Sub Command2_Click()

Text1.Text = ""

Text2.Text = ""

End Sub

7. klik dua kali pada bagian command3(exit) kemudian isikan script dibawah ini:

Private Sub Command3_Click()

End

End Sub

8. sehingga kode yang anda buat menjadi sebagai berikut:

9.  kemudian tekan tombol run pada bagian toolbar dan lihat apakah program anda berjalan sesuai keinginan anda.

Berikut adalah tampilan program yang anda buat:

10. selesai deh. selamat mencoba.

NB: KLIK PADA GAMBAR UNTUK MEMPERBESAR GAMBARNYA

BY: STEVEN TANDIONO