Kak mojno wyswetit dannye iz odnogo polya tablisy w DBcombo ispolzuya
ADO. Baza nahoditsya w SQL SERVER 2000. U menya kod takoy :

Dim ado As Recordset
Private Sub Form_Load()
Dim db As Connection
Set db = New Connection
db.CursorLocation = adUseClient
db.Open "PROVIDER=MSDASQL;dsn=p;uid=;pwd=;"
Set ado = New Recordset
ado.Open "select imya from Polzowateli", db, adOpenStatic, adLockOptimistic
Set DBCombo1.RowSource = ado
DBCombo1.ListField = "imya"
End Sub

Wyhodit takoe soobshenie: Object variable or with block variable not set

Spasibo zaranee