Menampilkan Hari

Menampilkan Hari f78



Public Class Form1

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged


    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox("Hari yang Anda Pilih" & ComboBox1.Text)

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ComboBox1.Items.Add("Minggu")
        ComboBox1.Items.Add("Senin")
        ComboBox1.Items.Add("Selasa")
        ComboBox1.Items.Add("Rabu")
        ComboBox1.Items.Add("Kamis")
        ComboBox1.Items.Add("Jumat")
        ComboBox1.Items.Add("Sabtu")
    End Sub

End Class


Postingan terkait:

Belum ada tanggapan untuk "Menampilkan Hari"

Post a Comment