Cara buat aplikasi nilai kelulusan
Buat dulu User Infterface nya kaya gini
Double Klik pada command button OK dan isi
kodingnya seperti gambar di bawah ini
Dim nilai As Integer, maksudnya variabel nilai
disitu dianggap sebagai angka
If nilai >= 70 Then, Jika nilai lebih besar
sama dengan 70 maka
MsgBox(“ Selamat Anda lulus” + Text1.text,
vbOKOnly, “ LABSI”)
Maksudnya jika kita klik OK dan nilainya lebih
besar sama dengan 70 maka akan muncul message box yang bertuliskan Selamat Anda
lulus Text1.text. Text1.text disini adalah nama yang nanti di Input oleh kita.
“LABSI” kaya judul pada msgbox nya.
Else, selain itu jadi kalo nggak masuk
statement yang pertama bakalan ke statement yang kedua.
Double klik pada command button clear dan isi
kodingan kaya gini
Jika command button Clear di klik maka
Text1.Text = ””” Text2.Text = ”” disini text1 dan text2
menjadi kosong karena “”
Double klik pada command button Exit isi
kodingannya kaya gini
Unload Me , adalah statement khusus untuk
keluar saat menjalankan program
Jika sudah coba input nama dan nilainya lalu
klik Ok
Contoh nya seperti ini
Tidak ada komentar:
Posting Komentar