Program Sederhana dengen Menggunakan Kondisi Percabangan If-Then-Else

Program yang saya buat ini untuk memenuhi tugas Vclass Pengantar Komputer & Teknologi Informasi 2B

Berikut implementasi If-Then-Else :


1. Buka aplikasi Visual Basic 6. Setelah dibuka tampilan nya seperti berikut ini. Kemudian pilih standar exe, dan klik open.

2. Setelah klik open, akan muncul tampilan utama vb.6 seperti ini

3. Kemudian buat 2 label, 2 textbox dan 1 command.

4. Pengaturan desain form, pengaturan dilakukan di jendela properti.

• pada label 1, isi property (caption) dengan bilangan. Pada label 2, isi property (caption) dengan keterangan.

• pada text box 1 dan 2 kosongkan property (text)

• pada command 1 isi property (caption) dengan cek

5. Pembuatan kode program beserta penjelasannya

Private sub command1_click ()

bil = Val (Text 1)

If bil Mod 2 = 0 Then  > bil Mod 2 =

                                          Kondisi perca-

                                          bangan

ket = "GENAP"              > pernyataan jika

                                           Kondisi genap

Else

ket = "GANJIL"             > pernyataan jika

                                          Kondisi ganjil

End If

Text 2 = ket

End sub

6. Uji coba aplikasi 

Logika dari programnya yaitu jika bilangan habis dibagi 2 maka bilangan itu genap, jika tidak bilangan tersebut ganjil.