Datagrid view VB.Net

alfa6661
- December 22, 2011
0 (0 votes)
Rate :
Penggunaan kontrol datagrid view pada Visual Basic.Net

Artikel berikut ini menjelaskan konsep dasar tentang kontrol DataGridView. DataGridView adalah sebuah kontrol di VB.net yang digunakan untuk menampilkan data dalam bentuk grid. Kontrol ini dirancang untuk menjadi solusi lengkap untuk menampilkan data tabular dengan Windows Forms. Artikel ini juga membahas bagaimana penggunaan DatagridView pada VB.Net

Menambahkan Kolom

Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click
    With DataGridView1
        .ColumnCount = 2
        .Columns(0).Name = "NIP"
        .Columns(1).Name = "Nama"
    End With
End Sub

Menambahkan baris / data

Anda dapat menambahkan baris dan kolom dengan kontrol dan secara manual mengisi dengan data. Kode berikut ini menunjukkan bagaimana untuk secara manual membuat Kolom dan Baris di DataGridView.

Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click
    With DataGridView1
        Dim row As String() = New String() {"6309189", "Alfa Adhitya"}
        .Rows.Add(row)
        'atau
        .Rows.Insert(.NewRowIndex, "6309189", "Alfa Adhitya")
    End With
End Sub

Get Selected Item

Untuk mendapatkan nilai dari datagridview, kita bisa menggunakan DataGridView1.Item, dan untuk menampilkan data yang terpilih, kita harus tuliskan script program pada event CellClick

Private Sub DataGridView1_CellClick(ByVal sender As Object, _
    ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellClick
    With DataGridView1
        TextBox1.Text = .Item(0, .CurrentRow.Index).Value
        TextBox2.Text = .Item(1, .CurrentRow.Index).Value
    End With
End Sub

Menghapus Semua Data

Untuk menghapus semua baris pada datagridview gunakan perintah DataGridView1.Rows.Clear()

Private Sub Button2_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button2.Click
    DataGridView1.Rows.Clear()
End Sub

Menghapus baris terpilih

Private Sub Button2_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button2.Click
    If DataGridView1.CurrentRow.Index <> DataGridView1.NewRowIndex Then
        DataGridView1.Rows.RemoveAt(DataGridView1.CurrentRow.Index)
    End If
End Sub

Mendapatkan jumlah baris

Private Sub Button4_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button4.Click
    MsgBox(DataGridView1.Rows.Count)
End Sub

Computer science education cannot make anybody an expert programmer any more than studying brushes and pigment can make somebody an expert painter

– Eric S. Raymond

Have a better explanation?

If you have comments about this post. Please write your comments below

No comments associated with this article