Sabtu, 07 Desember 2013

Contoh Program Visual Basic 2 Mengenal & Mengetahui Cara Penggunaan Listview
Tutorial kali ini saya akan memberikan contoh VisualBasic 2008  yang kedua

Langkah-langkahnya:
1. Membuka Program Visual Basic (VB) 2008

2. Klik create : Project
3. Ubah Project dengan Nama Anda sendiri
4. Maka setelah itu akan muncul sebuah FROM1 pada project Anda
5. Desain from dengan label, Textbox, Buttom, ListView
Tampilan From


6. Listing Program
Public Class Form2
    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        buattabel()
    End Sub
    Sub buattabel()
        LV.Columns.Add("NPM", 80, HorizontalAlignment.Center)
        LV.Columns.Add("Nama", 180, HorizontalAlignment.Left)
        LV.View = View.Details
        LV.GridLines = True
        LV.FullRowSelect = True
    End Sub
    Sub isitabel()
        Dim lst As New ListViewItem
        lst.Text = NPM.Text
        lst.SubItems.Add(Nama.Text)
        LV.Items.Add(lst)
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        isitabel()
        NPM.Text = ""
        Nama.Text = ""
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        LV.Items.Clear()
    End Sub
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        LV.Items.Remove(LV.SelectedItems(0))
    End Sub
End Class
7. Tampilan Form setelah dijalankan




NB :

  • Ketikan NPM Anda pada TextBox NPM
  • Ketikan Nama Anda pada TextBox Nama
  • Klik => buttton (Simpan Ke ListView)
  • Jika Anda ingin menghapusnya : Klik saja button (Hapus data yang Dipilih) atau jika ingin menghapus semua Datanya Klik saja button (Hapus Semua Data)

Silahkan di coba programnya ya :-* :-)

Tidak ada komentar:

Posting Komentar