Tutorial Vb.Net : Cara menampilkan Data dari Datagridview pas diklik akan tampil di TextBox,membuat DataGridView selected row's column values to textbox !
Agar Value Datagridview Selected Row's column Values muncul di Textbox gimana caranya Min ?
Cara menampilkan Data atau sebuah value dari event klik datagridview ke sebuah TextBox atau lebih sangat mudah, ikuti step by step Tutorial Vb.Net dibawah ini, sebelumnya silahkan baca - baca : Tutorial Vb.Net : Menampilkan Data Database Ke ComboBox,
Memulai Project :
Buatlah sebuah database MySQL, jika anda belum ngerti untuk membuat database, silahkan lihat lin - link yang ada di blog Sector Code, atau silahkan baca Tutorial Vb.Net : Menampilkan data dari Database MySql ke DataGridView, jika sudah add Form baru dengan nama Biodata.vb , masukkan Code berikut :
Private Sub isiTextBox(ByVal x As Integer)
Try
TextBox1.Text = DataGridView1.Rows(x).Cells(0).Value
TextBox2.Text = DataGridView1.Rows(x).Cells(1).Value
TextBox3.Text = DataGridView1.Rows(x).Cells(2).Value
TextBox4.Text = DataGridView1.Rows(x).Cells(3).Value
TextBox5.Text = DataGridView1.Rows(x).Cells(4).Value
TextBox6.Text = DataGridView1.Rows(x).Cells(5).Value
DateTimePicker1.Value = IIf(IsDBNull(DataGridView1.Rows(x).Cells(6).Value), Date.Now,
DataGridView1.Rows(x).Cells(6).Value)
TextBox7.Text = DataGridView1.Rows(x).Cells(7).Value
TextBox8.Text = DataGridView1.Rows(x).Cells(8).Value
TextBox9.Text = DataGridView1.Rows(x).Cells(10).Value
TextBox10.Text = DataGridView1.Rows(x).Cells(11).Value
TextBox11.Text = DataGridView1.Rows(x).Cells(12).Value
TextBox12.Text = DataGridView1.Rows(x).Cells(13).Value
DateTimePicker2.Value = IIf(IsDBNull(DataGridView1.Rows(x).Cells(14).Value), Date.Now,
DataGridView1.Rows(x).Cells(14).Value)
TextBox13.Text = DataGridView1.Rows(x).Cells(15).Value
TextBox14.Text = DataGridView1.Rows(x).Cells(16).Value
TextBox15.Text = DataGridView1.Rows(x).Cells(17).Value
TextBox16.Text = DataGridView1.Rows(x).Cells(18).Value
TextBox17.Text = DataGridView1.Rows(x).Cells(19).Value
TextBox18.Text = DataGridView1.Rows(x).Cells(20).Value
Catch ex As Exception
End Try
End Sub
Tinggal panggil dari Event Cell datagridview, lihat code berikut :
Private Sub DataGridView1_CellClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles
DataGridView1.CellClick
isiTextBox(e.RowIndex)
End Sub
Tekan F5 untuk melihat hasilnya,Terima Kasih :)
