تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
استفسار حول اداة ToolTip1
#1
السلام عليكم ورحمة الله وبركاته
المرجوا مثال او كود على استخدام الاداة ToolTipوجزاكم الله خيرا
الرد }}}
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته
تفضل أخي هذين المثالين

كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim toolTip1 As New ToolTip()
        toolTip1.SetToolTip(Me.Button1, "My button1")
    End Sub

كود :
Dim Tooltip1 As New ToolTip

    Private Sub Button1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseEnter
        Tooltip1.ToolTipIcon = ToolTipIcon.Info
        Tooltip1.Show("My Button1", Button1, Button1.Width, Button1.Height)
    End Sub

    Private Sub Button1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseLeave
        Tooltip1.Hide(Button1)
    End Sub
بالتوفيق
الرد }}}
تم الشكر بواسطة:
#3
السلام عليكم ورحمة الله وبركاته
بارك الله فيك وزادك من علمه
جزاك الله عنا كل خير
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم