Combo Box Value

[Guest]

How do you make a combobox reflect the value of more than one field when
using it to select records? Example, I have the following code for selecting
a record, and once the record is selected the combobox only show the rank of
the individual selected. I would like the combobox to show the rank, last
name, first name m.i. Is this possible?

Private Sub Combo79_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[PersonnelDataID] = " & Str(Nz(Me![Combo79], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

 

[Ken Snell \(MVP\)]

See this article:
http://www.mvps.org/access/forms/frm0058.htm