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

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

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

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()

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.

Bagikan Artikel ini

Berlangganan update artikel terbaru via email: