langsung saja, berikut adalah urutan langkah langkah yang harus di persiapkan.
- Database dan table
* Nama Database : dbminimarket
* Nama Table : pemasok - Koneksi
- Design Form
* Combobox : cmbkodepemasok
* textboxt : txtnamapemasok - Klik 2 kali di combobox
copikan coding dibawah ini.
kon.Open()
perintah = New MySql.Data.MySqlClient.MySqlCommand("SELECT pemasokid,pemasoknama FROM pemasok WHERE pemasokid = '" & cmbkodepemasok.Text & "'", kon)
cek = perintah.ExecuteReader
cek.Read()
If cek.HasRows Then
txtnamapemasok.Text = cek.Item(1) t
xtnamapemasok.Focus()
End If
cek.Close()
kon.Close() - Klik 2 kali di form
Copikan coding berikut ini didalamnya
kon.Open()
perintah = New MySql.Data.MySqlClient.MySqlCommand("select * from pemasok", kon) cek = perintah.ExecuteReader
cmbkodepemasok.Items.Clear()
Do While cek.Read
cmbkodepemasok.Items.Add(cek.Item(0))
Loop
perintah.Dispose()
cek.Close()
kon.Close() - Nah berikut Hasilnya
Sekian Dulu tutorial saya, Salam Coder
EmoticonEmoticon