Selanjutnya aku akan sharing gimana menampilkan data dari database ke combobox, berikut table database nya :
untuk menampikan kolom nama di item combobox, double klik pada form kosong, isikan coding berikut :
Private Sub Form_Load()
Combo1.Clear
Adodc1.RecordSource = "select*from bio"
Adodc1.Refresh
Adodc1.Recordset.MoveFirst
Do Until Adodc1.Recordset.EOF
Combo1.AddItem Adodc1.Recordset!nama
Adodc1.Recordset.MoveNext
Loop
End Sub
Berikut hasilnya :
sekian, ;-)
Tidak ada komentar:
Posting Komentar