TUTORIAL VISUAL BASIC "Percabangan IF"
Kalkulasi Nilai
kali ini kita akan belajar membuat form nilai beserta gradenya menggunakan percabangan IF .
berikut komponen yang digunakan dan perubahan captionya :
Nama
|
Object
|
Caption
|
Label1
|
Label1
|
Nilai 1
|
Label2
|
Label2
|
Nilai 2
|
Label3
|
Label3
|
Rata-Rata Nilai
|
Label4
|
Label4
|
Grade
|
Command1
|
Commandbutton1
|
Kalkulasi
|
Command2
|
Commandbutton2
|
Baru
|
Text1
|
Text1
|
Kosongkan
|
Text2
|
Text2
|
Kosongkan
|
Text3
|
Text3
|
Kosongkan
|
Text4
|
Text4
|
Kosongkan
|
setelah ubah seperti di atas kemudian masukkan kodingan pada commandbutton1 dengan cara double click command1(kalkulasi) lalu masukkan kodingan seperti ini:
a = Val(text1.text) adalah input dari text1 akan diubah menjadi tipe data Double kemudian diubah kedalam variabel A
b=val(text2.text) adalah input dari text2 akan diubah menjadi tipe data Double kemudian diubah kedalam variabel b. Kenapa harus diubah?? karena pada text1 inputnya datanya bertipe string dan untuk melakukan perhitungan kita perlu merubah datanya dari string menjadi integer atau double (yang dapat dihitung/angka). Disini kita mengunakan tipe data double karna double dapat
menampung floating point (bilangan koma) sehingga kita dapat menghitung
rata-rata dari 2 nilai yang diinputkan. Pada Kodingan di atas Jika rata-rata
nilai lebih besar dari 85 dan kurang dari 100 maka akan mendapatkan grade A.
Jika rata-rata nilai lebih besar dari 60 dan kurang dari 85 maka akan mendapat
grade”B” .Jika rata –rata nilai lebih dari 100 akan menampilkan pesan eror
“angka melebihi 100”. Jika pada text1 dan text2 di kosongkan akan menampilkan
pesan Eror “NIlai tidak boleh Kosong”.
Dan jika tidak memenuhi kondisi diatas maka akan mendapat grade C.lalu
text3.text=val (ratanilai) pada text 3 akan menampilkan hasil rata-rata nilai.
lalu kita mengkoding command2 (Baru)
Pada tombol baru berfungsi untuk membuat
tampilan seperti awal lagi dan menghapus text text yang sudah kita input. Berikut
kodinganya




Comments
Post a Comment