Cara Menampilkan Data Dari Database Ke Textbox Vb Net Dari ListView
Cara Menampilkan Data Dari Database Ke Textbox Vb Net Dari ListView - Halo teman – teman pada artikel kali ini kita membahas cara menampilkan data dari database ke Textbox Vb Net dari ListView. Menampilkan data dari database ke Textbox Vb Net dari Dari ListView dapat dilakukan untuk beberapa kebutuhan, salah satunya untuk langkah awal jika ingin mengedit data yang telah tersimpan ke dalam database.
Berikut langkah-langkah untuk menampilkan data dari database ke Textbox Vb Net dari ListView :
1. Buatlah tampilan desain program seperti gambar di bawah ini
2. Klik kanan pada tampilan form dan klik View Code
3. Masukkan coding koneksi database vb net di bawah ini untuk menghubungan database yang dibuat sebelumnya dengan program vb net yang sedang dibuat
4. Untuk memanggil database ke form load, Double click form load kemudian masukkan koding di bawah ini
5. Double Click ListView1
6. Kemudian rubah ListView SelectedIndexChanged menjadi ListView1_DoubleClick seperti gambar di bawah ini
7. Untuk menampilkan data dari database ke Textbox Vb Net dari ListView Masukkan koding di bawah ini pada ListView1_DoubleClick
8. Kemudian Jalankan Program Menampilkan Data Dari Database Ke Textbox Vb Net Dari ListView
Lakukan double click pada salah satu item data di listview dan lihat hasilnya di textbox
Demikian artikel tentang program Cara Menampilkan Data Dari Database Ke Textbox Vb Net Dari ListView pada postingan kali ini teman – teman. Semoga dapat bermanfaat.
Berikut langkah-langkah untuk menampilkan data dari database ke Textbox Vb Net dari ListView :
1. Buatlah tampilan desain program seperti gambar di bawah ini
2. Klik kanan pada tampilan form dan klik View Code
3. Masukkan coding koneksi database vb net di bawah ini untuk menghubungan database yang dibuat sebelumnya dengan program vb net yang sedang dibuat
Imports MySql.Data.MySqlClient
Public Class Form1
Public DB As New MySql.Data.MySqlClient .MySqlConnection
Public DR As MySqlDataReader
Public MSD As MySqlCommand
Public SQL As String
Public DS As DataSet
Public MDA As MySqlDataAdapter
Sub ShowDB()
SQL = "Server=Localhost;uid=root;database=database_siswa"
Try
DB.ConnectionString = SQL
DB.Open()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Public Class Form1
Public DB As New MySql.Data.MySqlClient .MySqlConnection
Public DR As MySqlDataReader
Public MSD As MySqlCommand
Public SQL As String
Public DS As DataSet
Public MDA As MySqlDataAdapter
Sub ShowDB()
SQL = "Server=Localhost;uid=root;database=database_siswa"
Try
DB.ConnectionString = SQL
DB.Open()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
4. Untuk memanggil database ke form load, Double click form load kemudian masukkan koding di bawah ini
Private Sub Form1_Load (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles MyBase. Load
ShowDB()
End Sub
End Class
ShowDB()
End Sub
End Class
5. Double Click ListView1
6. Kemudian rubah ListView SelectedIndexChanged menjadi ListView1_DoubleClick seperti gambar di bawah ini
7. Untuk menampilkan data dari database ke Textbox Vb Net dari ListView Masukkan koding di bawah ini pada ListView1_DoubleClick
TXBNoInduk.Text = ListView1. SelectedItems(0). Text()
SQL = "Select * from Tabel_Siswa Where NoInduk='" & TXBNoInduk.Text & "'"
MSD = New MySqlCommand(SQL, DB)
DR = MSD.ExecuteReader
If DR.HasRows = True Then
DR.Read()
TXBNoInduk.Text = DR!NoInduk
TXBnama.Text = DR!Nama
TXBjurusan.Text = DR!Jurusan
TXBkelas.Text = DR!Kelas
Else
End If
DR.Close()
SQL = "Select * from Tabel_Siswa Where NoInduk='" & TXBNoInduk.Text & "'"
MSD = New MySqlCommand(SQL, DB)
DR = MSD.ExecuteReader
If DR.HasRows = True Then
DR.Read()
TXBNoInduk.Text = DR!NoInduk
TXBnama.Text = DR!Nama
TXBjurusan.Text = DR!Jurusan
TXBkelas.Text = DR!Kelas
Else
End If
DR.Close()
8. Kemudian Jalankan Program Menampilkan Data Dari Database Ke Textbox Vb Net Dari ListView
Lakukan double click pada salah satu item data di listview dan lihat hasilnya di textbox
Demikian artikel tentang program Cara Menampilkan Data Dari Database Ke Textbox Vb Net Dari ListView pada postingan kali ini teman – teman. Semoga dapat bermanfaat.