Jumat, 04 Januari 2013
Contoh If .. Then pada visual basic
Label: contoh program
If...Then adalah bentuk pemilihan keputusan untuk satu
percabangan, bila kondisi terpenuhi (True),maka hanya satu percabangan saja
yang dikerjakan. sebaliknya jika kondisi tidak terpenuhi (False), maka tidak
ada yang dikerjakan.
if
<kondisi> then
<pernyataan>
End if
atau
if
<kondisi> then
<pernyataan>
....
<pernyataan>
End if
Contoh :
if a = 25 then
b=a
end if
kondisi bisa lebih dari
satu. Jika kondisi lebih dari satu, maka gabungkan kondisi-kondisinya dengan
menggunakan operator logika,
contoh :
if (a>70) and (a<80) then
b=a
end if
berikut contoh dalam
program:
- Buat new project, tambahkan 2 buah textbox dan 1 buah commanbutton
- Ubah properti caption command1 menjadi grade nilai, dan kosongkan properti text dari text1 dan text2
- Atur tampilan seperti dibawah !!
Private Sub Command1_Click()5. Jalankan program !!!
Dim nilai As Integer
nilai = Text1.Text
If (nilai < 60) Then
Text2.Text = "Grade nilai anda = E"
End If
If (nilai >= 60) And (nilai < 70) Then
Text2.Text = "Grade nilai anda = D"
End If
If (nilai >= 70) And (nilai < 80) Then
Text2.Text = "Grade nilai anda = C"
End If
If (nilai >= 80) And (nilai < 90) Then
Text2.Text = "Grade nilai anda = B"
End If
If (nilai >= 90) And (nilai <= 100) Then
Text2.Text = "Grade nilai anda = A"
End If
End Sub
Lihat juga :
- Contoh If..Then..Else pada visual basic
Related Post:
Langganan:
Postingan (Atom)
