Item value is highlighted in Listbox

[NT100]

I intend to build a listbox to fill the value (e.g. Mr., Mrs, Ms, Miss) of a "title" field from an ACCESS table and then highlight it in the listbox.

If !Title = "Dr" Then
lstTitle.Selected(0) = True

ElseIf !Title = "Mr" Then
lstTitle.Selected(1) = True

ElseIf !Title = "Mrs" Then
lstTitle.Selected(2) = True

ElseIf !Title = "Miss" Then
lstTitle.Selected(3) = True

ElseIf !Title = "Ms" Then
lstTitle.Selected(4) = True

End If

How can I highlight the value in the listbox?

What's the suggestions on this?

Thanks in advance.

 

[NT100]

Fixed. Thanks

 

[jdraw]

Would you care to share your solution? Others may have a similar problem and could benefit from your work.