Assalamu'alaikum, wr.wb
Contoh Select Case di Visual Basic - Selamat datang kembali rekan-rekan. Kali ini tentang cara menggunakan select case pada bahasa Visual Basic 6.0. Select case di Visual basic (VB) dapat menggantikan If Then Else. Bentuk penulisan select case lebih mudah dipahami, berbeda dengan struktur kontrol If yang agak sedikit membingungkan apalagi kondisinya banyak.
Struktur penulisan kontrol select case
Select Case (pilihan)
Case (pilihan 1)
(pernyataan 1)
Case (pilihan 2)
(pernyataan 2)
Case (pilihan 3)
(pernyataan 3)
Case Else
(pernyataan 4)
End Select
Contoh Select Case di Visual Basic - Selamat datang kembali rekan-rekan. Kali ini tentang cara menggunakan select case pada bahasa Visual Basic 6.0. Select case di Visual basic (VB) dapat menggantikan If Then Else. Bentuk penulisan select case lebih mudah dipahami, berbeda dengan struktur kontrol If yang agak sedikit membingungkan apalagi kondisinya banyak.
Struktur penulisan kontrol select case
Select Case (pilihan)
Case (pilihan 1)
(pernyataan 1)
Case (pilihan 2)
(pernyataan 2)
Case (pilihan 3)
(pernyataan 3)
Case Else
(pernyataan 4)
End Select
Contoh penggunaan select case di VB :
Copykan mantera dibawah ini :
Private Sub Command1_Click()
Dim no_hari As Integer
Dim hari As String
no_hari = Text1.Text
Select Case no_hari
Case 1
hari = "Ahad"
Case 2
hari = "Senin"
Case 3
hari = "Selasa"
Case 4
hari = "Rabu"
Case 5
hari = "Kamis"
Case 6
hari = "Jum'at"
Case 7
hari = "Sabtu"
Case Else
MsgBox " saat ini Jumlah hari hanya ada 7 om !", vbOKOnly, "Nama-Nama Hari"
End Select
Text2.Text = hari
End Sub
Dim no_hari As Integer
Dim hari As String
no_hari = Text1.Text
Select Case no_hari
Case 1
hari = "Ahad"
Case 2
hari = "Senin"
Case 3
hari = "Selasa"
Case 4
hari = "Rabu"
Case 5
hari = "Kamis"
Case 6
hari = "Jum'at"
Case 7
hari = "Sabtu"
Case Else
MsgBox " saat ini Jumlah hari hanya ada 7 om !", vbOKOnly, "Nama-Nama Hari"
End Select
Text2.Text = hari
End Sub
Demikain contoh pemakaian select case pada visual basic (VB) Moga bermanfaat. Seperti itulah kira-kira.
Baca juga --> Cara mempersingkat penulisan If Then Else
waduh saya susah pahamnya ya... harus baca berulang -ulang nih
ReplyDeleteiya nih mang yono. saya tidak terlalu pandai soalnya menjelaskan secara mendetail, hehe.
DeleteFlowchartnya juga dong mas
Deleteyes
ReplyDelete