منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
استفسار حول اداة ToolTip1 - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : استفسار حول اداة ToolTip1 (/showthread.php?tid=7393)



استفسار حول اداة ToolTip1 - 3amo - 15-12-12

السلام عليكم ورحمة الله وبركاته
المرجوا مثال او كود على استخدام الاداة ToolTipوجزاكم الله خيرا


استفسار حول اداة ToolTip1 - sooriaty03 - 16-12-12

وعليكم السلام ورحمة الله وبركاته
تفضل أخي هذين المثالين

كود :
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
بالتوفيق


استفسار حول اداة ToolTip1 - 3amo - 16-12-12

السلام عليكم ورحمة الله وبركاته
بارك الله فيك وزادك من علمه
جزاك الله عنا كل خير