08.01

VB.NET PERTEMUAN KE 3


PERTEMUAN KE TIGA DALAM VB.NET 

kali ini membahas tentang penggunaan list box dengan combo box,
Contoh dalam sebuah kasus terdapat label1 sebagai “nama” label 2 sebagai “ alamat “ lalu ada 2 buah textbox di sebelah label 

tadi,dan juga sebuah list box,dan sebuah button,


Setelah di buat seperti tampilan berkut double klik pada text box1,dan ubah jenis yang di pojok kanan atas nya menjadi key pressed
Lalu akan muncul syntax sperti berikut “   Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
       
    End Sub






Lalu isi di dalam sub tersebut  If e.KeyChar = Chr(13) Then
            TextBox2.Focus()
        End If
Lakukan instruksi tersebut pada textbox2 juga
Selanjutnya kita kembali ke desain form awal,lalu lakukan double klik pada tombol button lalu kitaakan masuk kepada event pada sebuah button,lalu ketik perintah ini   ListBox1.Items.Add(TextBox1.Text + "" + TextBox2.Text + "" + TextBox3.Text + "" + TextBox4.Text + "")
Coba jalankan program….
Jika sukses apa yang kita input pada pada text box 1 dan 2 akan tampil semua pada list box.(to be continued…...............)



Penggunaan  combo box dari text box
coba buat pada desain form seperti berikut
(MOHON MAAF TERJADI KESALAHAN)


lalu double klik pada button hingga ada scripT yang di garis bawahi
Public Class Form1

    Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        ComboBox1.Items.Add(TextBox1.Text)
    End Sub
End Class

lalu tuliskan syntax seperi diatas

cara ini
berguna untuk memasukan inputan ke dalam combo box secara berurutan. penambahan dapat ditentukan sesuai keinginan baik dilakukan di paling atas, paling bawah, atau di index yang diinginkan dengan cara :

Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        ComboBox1.Items.Insert(index ke berapa, TextBox1.Text)
    End Sub



UNTUK HASIL LEBIH JELAS YANG DISERTAI DENGAN GAMBAR SILAHKAN KLIK DISINI



semoga bermanfaat

0 komentar:

Posting Komentar