[ADS] Top Ads

Cara Membuat Autocomplete TextBox Dari Database Pada VB.Net

Cara Membuat Autocomplete TextBox Dari Database Pada VB.Net

Membuat Autocomplete TextBox Dari Database Pada VB.Net

Cara Membuat Autocomplete TextBox Dari Database Pada VB.Net - priacoding. Autocomplete merupakan metode untuk menampilkan data secara otomatis berguna untuk meminimalisir kesalahan penginputan data pada aplikasi, data yang tampilkan bisa dari database ataupun tidak. Pada tutorial VB.Net kali ini data yang ditampilkan diambil dari database MySQL. Berikut adalah tutorial membuat autocomplete textboxt berdasarkan database.
Oke langsung saja kita masuk ke tutorial nya...

1. Tambahkan 1 buah ComboBox pada form
Seperti Gambar..
Membuat Autocomplete TextBox Dari Database Pada VB.Net

2. Pada database mysql, silahkan buat database dan tebel terlebih dahulu
Saya memiliki tabel seperti dibawah..
Database Pada VB.Net

3. Pada code editor VB.Net, silahkan pastekan coding dibawah

Sub tampil()
        koneksi()
        cmd = New MySqlCommand("select nm_barang from tbl_barang", conn)
        da = New MySqlDataAdapter(cmd)
        dt = New DataTable
        da.Fill(dt)

        Dim a As New AutoCompleteStringCollection
        For i As Integer = 0 To dt.Rows.Count - 1
            a.Add(dt.Rows(i)("nm_barang"))
        Next
        TextBox1.AutoCompleteSource = AutoCompleteSource.CustomSource
        TextBox1.AutoCompleteCustomSource = a
        TextBox1.AutoCompleteMode = AutoCompleteMode.Suggest
    End Sub

Pada form load silahkan panggil sub tampil

Private Sub frabc_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        tampil()
    End Sub

Semua coding

Imports MySql.Data.MySqlClient
Public Class frabc

    Private Sub frabc_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        tampil()
    End Sub
    Sub tampil()
        koneksi()
        cmd = New MySqlCommand("select nm_barang from tbl_barang", conn)
        da = New MySqlDataAdapter(cmd)
        dt = New DataTable
        ' conn.Open()
        da.Fill(dt)

        Dim a As New AutoCompleteStringCollection
        For i As Integer = 0 To dt.Rows.Count - 1
            a.Add(dt.Rows(i)("nm_barang"))
        Next
        TextBox1.AutoCompleteSource = AutoCompleteSource.CustomSource
        TextBox1.AutoCompleteCustomSource = a
        TextBox1.AutoCompleteMode = AutoCompleteMode.Suggest
    End Sub
End Class

4. Jalankan aplikasi, maka akan menghasilkan
Membuat Autocomplete TextBox Dari Database Pada VB.Net

Untuk penjelasan lebih lanjut silahkan lihat video berikut.
Klik Dibawah
Unduh Sourcecode
Pass: priacoding.com


Note
Himbauan : Jika artikel ini memang berguna untuk teman-teman, MOHON artikel ini disharing kepada yang lain AGAR teman-teman kita juga mendapat manfaatnya. Terimakasih..

Post a Comment

[ADS] Bottom Ads