Question

我正在尝试在vb.net中的工具提示中工作。我想要做的就是我在文本框控件中编写的文本在工具提示中显示它。我可以在工具提示中显示文本，但我的问题是当我编辑输入文本时，它将在弹出工具提示中显示新旧文本。这是我到目前为止所做的。

Public Class Form1
  Dim s As String = ""

  Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
    s = TextBox1.Text
    Dim tooltip1 As System.Windows.Forms.ToolTip = New System.Windows.Forms.ToolTip()

    tooltip1.SetToolTip(Button1, s)
  End Sub
End Class

谢谢。

Answer 1

很难弄清楚这有用的原因，但请尝试使用文本框的TextChanged事件来更新工具提示：

Private _ToolTip As New ToolTip()

Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As EventArgs) _
                                 Handles TextBox1.TextChanged
  _ToolTip.Show(TextBox1.Text, TextBox1)
End Sub

显示文本框工具提示

1 个答案: