VB Code:
'global declarations
Dim data() As String
'-----------
cboCandName.Clear
x = 0
Do While Not records.EOF
cboCandName.AddItem records.Fields("AIZLTX").Value
Redim preserve data(x)
data(x) = "(" & records.Fields("AIBSCD").Value & " " & records.Fields("AIA8TX").Value & " " & records.Fields("AIDRCD").Value & " " & records.Fields("AIB2NB").Value & ")"
x = x + 1
records.MoveNext
cboCandName.ListIndex = 0
Loop
' to recall other data
'on cbo click event for example put this
Msgbox cboCandName.text & " " & data(cboCandName.listindex)