ListIndex > ControlTipText

[Maver1ck666]

Hi,

I have a form with a number of comboboxes on all linked to various tables in
a 2003 database.

What I am trying to attemp is to get a controltiptext to appear as the user
hovers over an item when the combobox is expanded. The text I want to appear
is in a seperate column in the same table as the list data.

This is what I have written so far:

Dim strCorrectionCategory As String
Dim strCorrectionCategoryToolTip As String

strCorrectionCategory = Me.cmbCorrectionCategory.Value

Set rsCorrectionCategoryToolTip = New ADODB.recordset
rsCorrectionCategoryToolTip.Open "SELECT * FROM [TblListCorrectionType]
where [CorrectionType] ='" & strCorrectionCategory & "'",
Application.CodeProject.Connection, adOpenKeyset

strCorrectionCategoryToolTip =
rsCorrectionCategoryToolTip![CorrectionTypeToolTip]

rsCorrectionCategoryToolTip.Close
Set rsCorrectionCategoryToolTip = Nothing

With Me.cmbCorrectionCategory

.ControlTipText = strCorrectionCategoryToolTip

End With

However it doesn't work. The controltip shws once the item has been clicked
but not before. Can anyone help with this please?

Thanks in advance for all you suggestions/help.

Kind regards,
Mav