Select data loaded into a combobox to appear in a textbox

[wizzy kidd]

Once i load the database into the combo box depending on which item you select it should change to the appropriate data for textbox 1,2 and three.
EXAMPLE:
COMBOBOX1= list of friends names (Loaded From database)
TEXT1,2,3= there address, phone number.
Everytime you select there name in the combobox there addres and phone number should automatically be updated into the textboxs.

[reznor]

if you got the recordset open you could use the find method of the recordset in the onclick event of the combobox; something like this:

Private Sub Combo1_Click()
   rs.Find "Name = '" & Combo1.List(Combo1.ListIndex) & "'"
   Text1.Text = rs("Address")
   Text2.Text = rs("PhoneNumber")
   etc
End Sub

hope this helps,
Rick

[venom8]

or u can do this:

--------------------------------------------------------------------------------
Private Sub Combo1_Click()

sqlstr= "Select * from MyTable where Name = '" & Combo1.List(Combo1.ListIndex) & "'"
MyRecordset.Open

With MyRecordset

If Not .BOF And Not .EOF then 'record exist

'display the data
Text1.Text = .Fields!Address
Text2.Text = .Fields!PhoneNumber
etc...

End if

End With

MyRecordset.Close


End Sub


hope this one helps too ! i'm just wondering how to post a code that appear like it's VB code?

[Kaverin]

Use [.vbcode ] and [./vbcode], but without those periods in there. I did that so it wouldn't actually think I was trying to write it.