Fungsi Sederhana CRUD (Create, Read, Update, Delete) Di Visual Basic .NET/VB.NET - Part 3 (Read)


Oke sekarang kita lanjut ke tutorial selanjutnya yaitu fungsi Read(tampil). Kamu bisa lihat tutorial sebelumnya Disini. Oke sekarang langsung aja kita ke topik pembahasan. Sebelum masuk ke bagian pengkodingan kamu desain dan tambahkan beberapa komponen ke form seperti dibawah ini.


Item Jumlah Properties
Textbox 3 Name = "txtNama"
"txtAlamat"
"txtSekolah"
Enabled = "False"
Label 3 Text = "Disesuaikan dengan gambar diatas"
Button 1 Name = "btnTampil"
Text = "Tampilkan"

Setelah semua didesain, sekarang saatnya masuk ke bagian pengkodingan. Untuk lebih jelasnya kamu bisa lihat di source code dibawah ini.

Imports MySql.Data.MySqlClient
Public Class Form1

    Dim cmd As MySqlCommand
    Dim rdr As MySqlDataReader

    Private Sub btnTampil_Click(sender As Object, e As EventArgs) Handles btnTampil.Click
            cmd = New MySqlCommand("Select * from test where nama like '%" & txtNama.Text & "%'", conn)
            rdr = cmd.ExecuteReader
            If rdr.Read = False Then
                MsgBox("Data Tidak Ditemukan!", vbCritical)
            Else
                txtAlamat.Text = rdr("alamat").ToString
                txtSekolah.Text = rdr("sekolah").ToString
            End If
    End Sub
End Class

Setelah semua selesai, kamu tinggal Run aplikasi kamu dengan menekan tombol F5 pada keyboard. Jika sukses maka data akan tampil sendiri, jika tidak mungkin ada kesalahan pada pengetikan Coding kamu. Oke sampai disini dulu, sampai jumpa di tutorial berikutnya. Jika ada pertanyaan silahkan berkomentar di bawah, Terima Kasih.