Show tooltip of each listbox item
Show tooltip of each listbox item
Rate Show tooltip of each listbox item
(1(1 Vote))
Dim index As Integer
On Error GoTo endList
WordHeight = 195
index = ListBox1.TopIndex + ((y) / WordHeight)
ListBox1.ListIndex = index
ListBox1.ToolTipText = ListBox1.Text
Exit Sub
endList:
ListBox1.ListIndex = ListBox1.ListCount - 1
ListBox1.ToolTipText = ListBox1.Text
End Sub
Show tooltip of each listbox item Comments
No comments yet — be the first to post one!
Post a Comment