VB.NETでリアルタイムのツールチップを使用

Question

多くの開発者が、彼のためにリアルタイムのツールチップを書くことができます。あなたは私の質問を理解していない場合
ので、ここで私はスムーズに私のカーソルを次のようにツールチップをしたいの例

で、誰もが私のコードを伝えることができますか？

Answer 1

これはあなたが求めたことを行います。私が言ったように、あなたは単にToolTipを表示して、あなたのためにそれを行うためにシステムに頼らないでください。

Private Sub Button1_MouseMove(sender As Object, e As MouseEventArgs) Handles Button1.MouseMove 
    Dim text = e.Location.ToString() 

    If text <> Me.ToolTip1.GetToolTip(Me.Button1) Then 
     Me.ToolTip1.Show(e.Location.ToString(), Me.Button1, New Point(e.X + 20, e.Y + 20)) 
    End If 
End Sub 

Private Sub Button1_MouseLeave(sender As Object, e As EventArgs) Handles Button1.MouseLeave 
    Me.ToolTip1.Hide(Me.Button1) 
End Sub 

Answer 2

あなたがツールチップは、マウスをフォローしたい場合は、多分this

Public Class Form1 

Private toolTipMsg As String = "Busy, Please Wait..." & vbCrLf & "Line2 Blah bla bla." 

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load 
    ToolTip1.Active = True 
    ToolTip1.IsBalloon = False 
    Timer1.Start() 
End Sub 

Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick 
    ' get cursor position 
    Dim cp = Cursor.Position 
    ' offset Y so tooltip is under mouse 
    cp.Y += CInt(Cursor.Size.Height * 1.5) 
    ' show tooltip 
    ToolTip1.Show(toolTipMsg, Me, PointToClient(cp)) 
End Sub