Dim toolTip1 As New ToolTip() ' Set up the delays for the ToolTip. toolTip1.AutoPopDelay = 5000 toolTip1.InitialDelay = 10 toolTip1.ReshowDelay = 100 ' Force the ToolTip text to be displayed whether or not the form is active. toolTip1.ShowAlways = True ' Set up the ToolTip text for the Button and Checkbox. toolTip1.SetToolTip(Me.Primo, "Primo Record") toolTip1.SetToolTip(Me.Precedente, "Record Precedente") toolTip1.SetToolTip(Me.Ultimo, "Ultimo Record") toolTip1.SetToolTip(Me.Successivo, "Record Successivo") |