locked
how can i add a label to be appeared with mouse over ? RRS feed

  • Question

  • Hello,

    My question is how can i add a label to be appeared when the user put the cursor on picture (question mark for example , label of support will be appeared)

    Thursday, June 20, 2019 6:07 AM

Answers

  • Hi,

    question mark 

      Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            PictureBox1.Cursor = Cursors.Help
            'Dim toolTip1 As ToolTip = New ToolTip()
            'toolTip1.AutoPopDelay = 5000
            'toolTip1.InitialDelay = 500
            'toolTip1.ReshowDelay = 200
            'toolTip1.ShowAlways = True
            'toolTip1.SetToolTip(PictureBox1, "Mylabel")
        End Sub

    or label

     Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            'PictureBox1.Cursor = Cursors.Help
            Dim toolTip1 As ToolTip = New ToolTip()
            toolTip1.AutoPopDelay = 5000
            toolTip1.InitialDelay = 500
            toolTip1.ReshowDelay = 200
            toolTip1.ShowAlways = True
            toolTip1.SetToolTip(PictureBox1, "Mylabel")
        End Sub

    Best Regards,

    Alex


    MSDN Community Support Please remember to click "Mark as Answer" the responses that resolved your issue, and to click "Unmark as Answer" if not. This can be beneficial to other community members reading this thread. If you have any compliments or complaints to MSDN Support, feel free to contact MSDNFSF@microsoft.com.


    • Edited by Alex-KSGZ Thursday, June 20, 2019 6:39 AM
    • Marked as answer by Raad Daqqah Thursday, June 20, 2019 11:31 AM
    Thursday, June 20, 2019 6:27 AM

All replies

  • Hi,

    question mark 

      Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            PictureBox1.Cursor = Cursors.Help
            'Dim toolTip1 As ToolTip = New ToolTip()
            'toolTip1.AutoPopDelay = 5000
            'toolTip1.InitialDelay = 500
            'toolTip1.ReshowDelay = 200
            'toolTip1.ShowAlways = True
            'toolTip1.SetToolTip(PictureBox1, "Mylabel")
        End Sub

    or label

     Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            'PictureBox1.Cursor = Cursors.Help
            Dim toolTip1 As ToolTip = New ToolTip()
            toolTip1.AutoPopDelay = 5000
            toolTip1.InitialDelay = 500
            toolTip1.ReshowDelay = 200
            toolTip1.ShowAlways = True
            toolTip1.SetToolTip(PictureBox1, "Mylabel")
        End Sub

    Best Regards,

    Alex


    MSDN Community Support Please remember to click "Mark as Answer" the responses that resolved your issue, and to click "Unmark as Answer" if not. This can be beneficial to other community members reading this thread. If you have any compliments or complaints to MSDN Support, feel free to contact MSDNFSF@microsoft.com.


    • Edited by Alex-KSGZ Thursday, June 20, 2019 6:39 AM
    • Marked as answer by Raad Daqqah Thursday, June 20, 2019 11:31 AM
    Thursday, June 20, 2019 6:27 AM
  • Many Thanks =D

    Thursday, June 20, 2019 11:31 AM