devxlogo

Adding Items in List Boxes as Tooltips

Adding Items in List Boxes as Tooltips

This piece of code lets you display an item in a list box as that list box’s tooltip.

  Private Sub lstItems_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)    Dim lngIndex As Long    lngIndex = lstItems.TopIndex + (Y  TextHeight(

devx-admin

Share the Post: