none
如何實作當MOUSE停留在某個Control時會出現訊息框? RRS feed

  • 問題

  • 請教各位學長:

    如同FOXPRO的功能,當MOUSE停留在某個CONTROL上大約2秒,就會出現一個說明文字的訊息框,不知道VB.NET2005有這個功能嗎?

    2007年8月8日 上午 03:21

解答

  • 你可以利用 Tooltip 來實作。

     

    ' This example assumes that the Form_Load event handling method
    ' is connected to the Load event of the form.
    Private Sub Form1_Load(sender As Object, e As System.EventArgs) Handles MyBase.Load
       ' Create the ToolTip and associate with the Form container.
       Dim toolTip1 As New ToolTip()
       
       ' Set up the delays for the ToolTip.
       toolTip1.AutoPopDelay = 5000
       toolTip1.InitialDelay = 1000
       toolTip1.ReshowDelay = 500
       ' 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.button1, "My button1")
       toolTip1.SetToolTip(Me.checkBox1, "My checkBox1")
    End Sub
    
     
    2007年8月8日 上午 03:23
    版主

所有回覆

  • 你可以利用 Tooltip 來實作。

     

    ' This example assumes that the Form_Load event handling method
    ' is connected to the Load event of the form.
    Private Sub Form1_Load(sender As Object, e As System.EventArgs) Handles MyBase.Load
       ' Create the ToolTip and associate with the Form container.
       Dim toolTip1 As New ToolTip()
       
       ' Set up the delays for the ToolTip.
       toolTip1.AutoPopDelay = 5000
       toolTip1.InitialDelay = 1000
       toolTip1.ReshowDelay = 500
       ' 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.button1, "My button1")
       toolTip1.SetToolTip(Me.checkBox1, "My checkBox1")
    End Sub
    
     
    2007年8月8日 上午 03:23
    版主
  • 謝謝小朱學長指教,正在使用中了。

    2007年8月9日 上午 09:56