DataGridView

DataGridView dirancang untuk menjadi solusi lengkap untuk menampilkan data tabular dengan Windows Forms. Kontrol DataGridView sangat dapat dikonfigurasi dan dapat diperluas, dan menyediakan banyak properti, metode, dan event untuk menyesuaikan tampilan dan tingkah lakunya. Kontrol DataGridView digunakan untuk menampilkan data dari berbagai sumber data eksternal. Sebagai alternatif, Anda dapat menambahkan baris dan kolom ke kontrol dan mengisi secara manual dengan data.

Public Class Form2

    Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        'menentukan jumlah kolom

        DataGridView1.ColumnCount = 3

        'memberi judul kolom

        DataGridView1.Columns(0).Name = "Judul 1"

        DataGridView1.Columns(1).Name = "Judul 2"

        DataGridView1.Columns(2).Name = "Judul 3"

        'menambahkan isi

        Dim row As String() = New String() {"Baris 1 kolom 1", "Baris 1 kolom 2", "Baris 1 kolom 3"}

        DataGridView1.Rows.Add(row)

        row = New String() {"Baris 2 kolom 1", "Baris 2 kolom 2", "Baris 2 kolom 3"}

        DataGridView1.Rows.Add(row)

        row = New String() {"Baris 3 kolom 1", "Baris 3 kolom 2", "Baris 3 kolom 3"}

        DataGridView1.Rows.Add(row)

    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        'mengambil nilai DataGridView yang dipilih

        Dim satu, dua, tiga As String

        satu = DataGridView1.SelectedRows.Item(0).Cells(0).Value

        dua = DataGridView1.SelectedRows.Item(0).Cells(1).Value

        tiga = DataGridView1.SelectedRows.Item(0).Cells(2).Value

        'menampilkan nilai ke messagebox

        MessageBox.Show(satu & "," & dua & "," & tiga)

    End Sub

End Class