Minggu, 08 April 2012

Jawaban Kuis No 2 Visual Basic


Dengan input berupa:

  • TOEFL
  • Umur
  • Pendidikan

Dengan output berupa:

Hasil bernilai “Lulus” dengan syarat:

  • TOEFL > = 400
  • Usia <= 36
  • Pendidikan S1 atau S2

Hasil bernilai “Tidak Lulus” jika tidak memenuhi syarat tersebut.


Tampilan Program :






Coding Program :


Private Sub Command1_Click()

If (Text1.Text >= 400) And (Text2.Text <= 36) And (Text3.Text = "S1" Or Text3.Text = "S2") Then

Text4.Text = "Lulus"

Else

Text4.Text = "Tidak Lulus"

End If

End Sub


Tidak ada komentar:

Posting Komentar