Membuat Program Sederhana dengan Menggunakan Kontrol Percabangan Select-Case pada Visual Basic 6

Assalammu'alaikum😊 Kali ini saya akan sharing ke teman-teman semua bagaimana cara membuat program sederhana dengan percabangan Select-Case pada Visual Basic 6. 

--------------------------------------------------------------------

Langkah-Langkah Membuat Program Sederhana dengan Menggunakan Kontrol Percabangan Select-Case pada Visual Basic 6

1. Buka aplikasi Visual basic 6.

2. Lalu buat New  Project dengan Standar EXE, lalu klik Open.

3. Desain form dengan menambahkan 3 Label, 1 text dan 2 command button.

4. Atur property label, textbox dan command button seperti dibawah ini:

Object	Property	Value
Label1	Caption	Enter Your Mark Here
Label2	Caption	Your Grade
Label3	Caption	(kosongkan)
Text1	Text	(kosongkan)
Command1	Caption	Show Grade
Command2	Caption	Refresh

5. Setelah itu double klik Button, isi dengan kode program di bawah ini.

Private Sub Command1_Click()

Dim Grade As String

Dim Nilai As Integer

Nilai = Val(Text1.Text)

Select Case Nilai

Case Is > 90

Grade = "A"

Case Is > 80

Grade = "B"

Case Is > 70

Grade = "C"

Case Is > 65

Grade = "D"

Case Else

Grade = "E"

End Select

Label3.Caption = Grade

End Sub

Private Sub Command2_Click()

Text1.Text = ""

Label3.Caption = ""

End Sub

6. Setelah itu jalankan program dengan klik F5.

Flowchart Logika Select-Case