Visual Basic - un ejemplo simple por fa...

Hola...necesito un ejemplo simple pero super
urgente....me estoy iniciando y llevo mas de 1 semana en lo mismo..

tengo una BD access 2000
nombre
direccion
telefono

lo que necesito es crear un ComboBox o DataCombo
con por ej: la lista de nombres...
hasta ahi..todo bien, eso ya lo consegui..el problema comienza cuando quiero que me muestre los
datos del nombre que he seleccionado...

Gracias a quien me ayude...es super urgente

solo has esto en declaraciones:
Dim basedatos As Database
Dim record As Recordset
y pon estos coontroles, la bdd es la de vb:

Private Sub Combo1_Click()
record.MoveFirst
Do While Not record.EOF
If Combo1.Text = record!au_id Then
Text1.Text = record!Author
Exit Do
End If
record.MoveNext
Loop
End Sub

Private Sub Form_Load()

Set basedatos = OpenDatabase("c:\pruebita\biblio.mdb")
Set record = basedatos.OpenRecordset("Authors")

record.MoveFirst
Do While Not record.EOF
Combo1.AddItem record!au_id
record.MoveNext
Loop

End Sub

Private Sub Form_Terminate()
record.Close
basedatos.Close
End Sub
obviamente que puedes mejorarlo usando intrucciones sql y si tienes vb 6.0 usa un data enviroment enlaza directamente con el combo y los text los datos que quieras que ponga. pero este codigo te puede salvar de algunas..

Este ejemplo usa un control DBCombo. Recuerda que que este control debes enlazarlo con un control Data y configurar las siguientes propiedades:

RowSource = Data1
ListField = Campo que se verá en el DBCombo
BoundColumn = Campo que se verá en el TextBox

Por último debes usar el siguiente código en el módulo del formulario

Private Sub DBCombo1_Click(Area As Integer)
Text1.Text = DBCombo1.BoundText
End Sub