Menggunakan Label, TextBox, ComboBox, Button di VB.Net 2010 ~ PAW

Hi, pawers, tutorial kali ini, saya akan mengajarkan menggunakan label, textbox, combobox, dan button di vb.net 2010. Pertama sobat pawers desain dulu ya layout nya seperti gambar dibawah ini:

Nah, setelah selesai mendesain layoutnya, sekarang kita masukan codingnya satu per satu. Sobat pawers jangan lupa untuk memberi nama setiap component yang telah di desain. Kemudian untuk codingnya akan saya jelaskan satu persatu.

#1 Coding untuk mengisi item pada combobox

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        CmbJurusan.Items.Add("Teknik Informatika")
        CmbJurusan.Items.Add("Sistem Informasi")
        CmbJurusan.Items.Add("Manajemen Akuntansi")
        CmbJurusan.Items.Add("Manajemen Bisnis")
End Sub

Koding diatas digunakan untuk memasukkan item ke dalam combobox jurusan.

#2 Coding untuk tombol OK
Di sini setelah kita mengklik tombol OK, maka akan muncul combobox kemudian isi dari combobox sesuai dengan data yang telah kita isikan tadi.

Private Sub CmdOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdOK.Click
        MsgBox("NIM Anda adalah : " & TxtNim.Text & "" & vbCrLf & _
               "Nama Anda adalah: " & TxtNama.Text & "" & vbCrLf & _
               "Asal Sekolah adalah: " & TxtAsal.Text & "" & vbCrLf & _
               "Jurusan adalah: " & CmbJurusan.Text, MsgBoxStyle.Information, "Pesan")
End Sub

vbCrLf digunakan untuk mengenter baris pada koding.

#3 Coding untuk tombol Keluar

Private Sub CmdKeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdKeluar.Click
        Me.Close()
End Sub

Nah, mudah bukan sobat pawers? jika ada sobat yang ingin mendownload source codenya bisa di sini

Menggunakan Label, TextBox, ComboBox, Button di VB.Net 2010

Related Post