Home | Looking for something? Sign In | New here? Sign Up | Log out

Jumat, 04 Januari 2013

Contoh If .. Then pada visual basic

Jumat, 04 Januari 2013


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:
  1.  Buat new project, tambahkan 2 buah textbox dan 1 buah commanbutton
  2. Ubah properti caption command1 menjadi grade nilai, dan kosongkan properti text dari text1 dan text2
  3. Atur tampilan seperti dibawah !!

     4. Masukan code program di bawah ini:

Private Sub Command1_Click()
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
     5. Jalankan program !!!

Lihat juga :
- Contoh If..Then..Else pada visual basic

Related Post:

1 komentar:

Unknown mengatakan...

bagaimana dengan setiap deret bilangan berkelipatan 3 dan hasil deretan bilangan dikurangi 4

Posting Komentar

Related Posts Plugin for WordPress, Blogger...
 

Contoh Pilihan

SMS GRATIS

Like Box