If you go to the Properties window for your listbox, then go to the RowSource property. You can populate your listbox pretty easily. You just enter in your range. Enter the range exactly the way it would apprear in the formula bar so if your data was on Sheet1 in cells A1 through A25 you'd enter this:
Sheet1!A1:A25
And WALA! your listbox is quickly filled. If the list is short, and you won't be referencing a range you might want to fill the list somewhat like this:
Dim MyList As Variant
MyList = Array("Bob", "Dan", "Mike", "Joe")
ListBox1.List = MyList
After that you can use a Select statement to fill the textbox using either the listbox's value or listindex:
Select Case ListBox1.Value
Case "Bob"
TextBox1.Value = "red hair, blue eyes, 5 ft 10in, 178 lb, abnoxious"
Case "Dan"
TextBox1.Value = "brown hair, green eyes, 5 ft 8in, 278 lb, funny"
Case "Mike"
TextBox1.Value = "white hair, brown eyes, 6 ft 10in, 176 lb, tall"
Case "Joe"
TextBox1.Value = "pink hair, green eyes, 5 ft 1in, 121 lb, rocker"
End Select