Visual Basic - Combos con SQL

Hola amigos del foro…
Les puedo solicitar su ayuda? bueno les cuento
Tengo 2 tablas en las cuales estoy guardando datos., el problema que tengo es que necesito llenar dos combos con datos diferentes el primer combo con la tabla1 y el combo2 con datos de la tabla2 ahora he conseguido llenar el primer combo1 con datos de la tabla1 mediante este código:

****************************CODIGO LLENA COMBO1**************************
Private Sub Form_Load()
sql = ""
sql = sql + " select * from marcas"
Set vista = db.CreateDynaset(sql)
Do Until vista.EOF
On Error Resume Next
Combo4.AddItem (vista.Fields(0))
Combo5.AddItem (vista.Fields(2))
vista.MoveNext
Loop
End Sub

LA PREGUNTA ES:
COMO LLENO EL COMBO2 DESDE LA TABLA2 LO TENGO QUE HACER EN EL EVENTO FORM_LOAD DEL FORMULARIO? O DIRECTAMENTE DEL COMBO2 COMO POR EJEMPLO ASI!

EJEMPLO
Private Sub Combo1_Click()
COMBO2 = “select * from tabla2”
Set vista=db.createdynaset(sql)
Do Until vista.EOF
On Error Resume Next
Combo4.AddItem (vista.Fields(0))
Combo5.AddItem (vista.Fields(2))
vista.MoveNext
loop
End Sub

Espero me puedan ayudar amigos...

Salu2. y que esten bien atte….

Vbmc_2004