• Home
 · 
• Databases/Data Access/DAO/ADO
 · 
• This code lists the data from a field in the combo Box

This code lists the data from a field in the combo Box

This code lists the data from a field in the combo Box

API Declarations


'Create a database with a Name "Database.mdb"
'make a field "Students" in the database. You can make others also
'in a form, draw a combo box and a command button
'draw a datacontrol in the form



Rate This code lists the data from a field in the combo Box

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

with data1
  .databasename=App.path & "\database.mdb" 'or C:\database.mdb; path
   .recordsource="Select Students From Database" ' or "Students"
  .refresh
end with
end sub

Private Sub Form_Load()
on error resume next
Do Until data1.recordset.EOF
combo1.additem data1.recordset.fields("Students")
data1.recordset.movenext
loop
End Sub