Menampilkan Data Dari Database ke TextBox VB.Net
Menampilkan Data Dari Database ke TextBox VB.Net – Setelah sebelumnya kita telah mempelajari tentang bagaimana caranya menampilkan data dari database ke data grid view, kali ini kita akan membahas mengenai bagaimana cara menampilkan data dari database kedalam textbox di vb.net.
Masih memanfaatkan sistem sekolah yang sebelumnya sudah kita buat, kita akan memanfaatkan textbox NIP untuk memasukan nip, dan menampilkan data siswa yang memiliki nip yang kita masukan kedalam textbox nama, no telfon dan alamat.
Buat sebuah subroutine baru didalam vb.net, beri nama subroutine tersebut dengan tampilTextbox, masukan perintah untuk menampilkan data dari database kedalam textbox di vb.net seperti berikut ini :
Sub tampilTextBox() Try Call koneksi() Dim str As String str = "select * from siswa where nip = '"& txtNip.Text &"'" cmd = New MySqlCommand(str, conn) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then txtNama.Text = rd.Item("nama") txtNoTelp.Text = rd.Item("notelp") rtbAlamat.Text = rd.Item("alamat") End If Catch ex As Exception End Try End Sub
Selanjutnya kita buat sebuah event keypress enter di txtNip, maksudnya untuk menjalankan perintah tampilTextBox setelah user memasukan NIP dan menampilkan datanya kedalam textbox nama, no telfon dan alamat.
Untuk lebih jelasnya bagaimana menampilkan data dari database kedalam textbox dengan memanfaatkan event keypress seperti berikut ini :
Private Sub txtNip_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtNip.KeyPress If (e.KeyChar = Chr(13)) Then Call tampilTextBox() End If End Sub
Oke sekarang coba jalankan programnya, masukan nip 10108822 atau nip apa saja yang sudah anda masukan di database kedalam txtNIP, lalu tekan tombol enter. Nanti data dari nip 10108822 tersebut akan ditampilkan di txtnotelp, txtnama dan juga rtbALamat. Seperti gambar berikut ini :
Yup seperti itulah cara bagaimana menampilkan data dari database kedalam textbox di vb.net. semoga tutorial ini dapat memberikan manfaat bagi para pembaca sekalian. Sampai bertemu lagi di tutorial mengenai vb.net lainnya ya dan sering sering berkunjung ke lebakcyber.net.
Masih ga ada aksi apa apa nih, source code juga ga ada yg error. ada solusi ?
Coba tambahin perintah ini diantara Catch ex As Exception sama End Try gan biar keliatan kalo ada error, jadi nanti perintahnya jadi seperti ini :
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
fungsi rd apa gan ?
rd merupakan Mysql data reader. Ada baiknya silahkan baca dulu tutorial ini : https://lebakcyber.net/membuat-module-koneksi-vb-net-dan-mysql/ sebelum mulai masuk ke pembahasan di atas.
Terima Kasih.
kalau membuat semacam session di vb gmn? misal ada 2 form (formlogin dan formdata) setelah login berhasil pindah ke tampilan formdata, dan di formdata ini muncul foto sesuai user yg login itu
thx you
bikin 2 form dan validasi login make
Call koneksi()
cmd = New OdbcCommand(“select * from petugas where username='” & TextBox1.Text & “‘and password='” & TextBox2.Text & “‘and level='” & ComboBox1.Text & “‘”, conn)
dr = cmd.ExecuteReader
dr.Read()
If dr.HasRows Then
MessageBox.Show(“Berhasil Login”, “Informasi”, MessageBoxButtons.OK, MessageBoxIcon.Information)
menuPetugas.panelnama.Text = dr.Item(“nama_petugas”)
menuPetugas.panelstatus.Text = dr.Item(“level”)
menuPetugas.Show()
Call bersih()
Me.Hide()
kalo mau buat kayak gini tapi data base nya pake access gimana ya?
cara diatas juga bisa di pake go gan, tapi agan harus ubah dulu modul koneksinya jadi ke access, bisa diliat di tutorial ini : https://lebakcyber.net/tutorial-belajar-visual-basic-net-module-koneksi-vb-net-ke-ms-access/