我展示了这样的工具提示:
Sub Form1_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) Handles Me.KeyPress
If e.KeyChar = ChrW(3) Then
Clipboard.SetDataObject("X:" & MousePosition.X & " " & "Y:" & MousePosition.Y)
Me.ToolTip1.Show("Copied into the clipboard", Me.Label8)
End If
End Sub
但工具提示不会消失......
我有“autopopdelay”(5000)和我的“tooltip1”的其他属性的正确值,但如果我像我解释的那样调用工具提示,那么我无法在之后自动关闭它“X”秒......
PS:我已尝试使用“ thread.sleep ”方法在启动工具提示后等待“x”秒以关闭它,但此方法会停止我的主窗体的进程,所以我需要更好的方法来做到这一点。
我做错了什么?
三江源
答案 0 :(得分:1)
我责备。 ToolTip是一个非常古怪的组件。您可以通过明确指定持续时间来稍微改变它的形状:
Me.ToolTip1.Show("Copied into the clipboard", Label1, 1500)
这将使其按预期消失。仍然不太正确,单击提示将其关闭会暂时停用表单。支持这种通知的另一个控件,即StatusStrip。