在VB.NET中使用实时工具提示

时间:2016-04-06 04:31:14

标签: vb.net

许多开发人员可以为他自己写实时工具提示 所以,如果你不理解我的问题,这里是例子

Not real time
我希望光标跟随光标的工具提示,有人可以告诉我代码吗?

2 个答案:

答案 0 :(得分: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

答案 1 :(得分:0)

如果您希望工具提示跟随鼠标,可以使用计时器和this

之类的东西
function f(){
    console.log("a = 1");
};

console.log(f.toSource());
console.log(f.toString());