VB : Contoh program pembayaran uang semester

Contoh program pembayaran uang semester

1.       Data input :

1.       Nama Mahasiswa

2.       No. Registrasi

3.       Jurusan (menggunakan checkbox)

·         Informatika

·         Fisika

·         Psikologi

4.       Waktu kuliah (menggunakan optionbutton)

·         Pagi

·         Siang

·         Malam

2.       Data output :

1.       Biaya jurusan

2.       Biaya kuliah

3.       Total pembayaran

Data proses :

1.       Jurusan

Kode program : 

                Nb : kode program di ketik  pada checkbox1,2 dan 3

Rumus :

if check2.value = 1 then

Text4 = biaya jurusan

Else

                Text4 = 0

Endif

Dst…

2.       Waktu kuliah*

Kode program :

*kode program di ketik pada command button 1 .

Rumus :

If option2.value = True Then

                Text5 = biaya waktu kuliah

Else

If option3.value = True Then

                Text5 = biaya waktu kuliah

Endif

Endif

Total biaya :

Biaya jurusan + biaya waktu kuliah .

Rumus : text3 = val(text4) + val(text5)

Contoh form :

Kode program untuk clear all :

Text1 = clear

Dst….

Kode program untuk exit :

MsgBox "terima kasih"

End