by tv (1 Submission)
Category: Miscellaneous
Compatability: Visual Basic 3.0
Difficulty: Beginner
Date Added: Wed 3rd February 2021
Rating: 
(7 Votes)
Simple code to display tooltips displaying the text, regardless of length, of an msflexgrid cell. Tooltips are displayed when the mousepointer passes over any cell.
Assumes
Just place it the mouse move event.
Side Effects
None that I know of.
VBcodersPrivate Sub Grid1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
Static txt As String
Dim tip As String
tip = Grid1.TextMatrix(Grid1.MouseRow, Grid1.MouseCol)
If txt <> tip Then
Grid1.ToolTipText = tip
txt = tip
End If
End Sub