Artikel berikut ini akan menjelaskan konsep dasar tentang kontrol DataGridView. DataGridView adalah sebuah kontrol di Visual Basic.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 Visual Basic.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
No Comments
Leave a comment Cancel