Otak Atik Aja: Menyisipkan dan Menghapus Text ke dalam CheckListBox

Tutorial ini akan membahas cara menyisipkan teks di Textbox ke dalam ChekListBox, jika sudah disisipkan akan berubah menjadi data pada ChekListBox. selain menyisipkan teks akan di tambah menghapus data pada Cheklistbox. ikuti langkah-langkab berikut.

Toolbox yang di butuhkan :

Toolbox	Propertis	Value
TextBox1	-	-
CheckedListBox1	-	-
Button1	Text	Tambahkan
Button2	Text	Hapus dipilih
Button3	Text	Hapus Semua

Langkah 1.

Masuk ke Visual Basic 2010 pilih menu File kemudian New Project. jika sudah tampil form New Project pilih menu Installed Templates pilihlah Visual Basic kemudian pilih Windows Form Aplication, kalau perlu pada Name rubahlah nama projectnya sesuai apa yang akan di buat. jika sudah selesai pilih tombol Ok jika batal pilih Cancel. jika sulit dan tidak paham mengikuti langkah-langkahnya maka akan ditampilan gambar seperti di bawah ini.

Exported from Notepad++

Atau bisa juga seperti dibawah ini

Tahapan berikutnya

jika sudah tekan tombol Ok maka akan tampil seperti dibawah ini.

Langkah 2

Buat seperti tampilan ini.

Langkah 3

Beri nama kegunaan pada setiap Button.

Langkah 4

Double Clik pada Button1 lalu isikan source code seperti gambar di bawah ini.

Ini adalah source code atau saya menyebutnya dengan coding

Public Class Form1

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

        'menambahkan teks ke dalam CheckListBox1
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        CheckedListBox1.Items.Remove(CheckedListBox1.SelectedItem)

        'menghapus teks yang dipilih pada Cheklistbox1
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        CheckedListBox1.Items.Clear()

        'menghapus teks yang dipilih pada Cheklistbox1
End Sub
End Class

Langkah 5

Jalankan atau eksekusi program setelah anda mengisi codingnya dengan menekan F5 atau dengan cara Pilih menu Debug kemudian Start Debug (F5), dika running program akan seperti di bawah ini. anda bisa mengisi di Textbox kata-kata sesuai yang anda mau.

Oke sekian tutorial dari saya

Terimakasih

Key:
add text in ChekListBox

vb 2010, microsoft visual basic 2010.

16 Jun 2016

Menyisipkan dan Menghapus Text ke dalam CheckListBox