منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : طريقة تصغير المشروع
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله 
 ارجو مساعدتي 
عند الضغط على الزر  CancelButton       x لاغلاق المشروع
  او الضغط  -  لتصغير الشروع لاسفل شريط المهام
 يتم وضع المشروع  اسفل شريط المهام بالقرب من ساعة الجهاز
وعليكم السلام ورحمة الله وبركاته:
قم باضافة اداة (NotifyIcon1) الى مشروعك واستخدم الاكواد التالية :

كود :
       Private Sub NotifyIcon1_MouseDoubleClick(sender As Object, e As MouseEventArgs) Handles NotifyIcon1.MouseDoubleClick
        Me.Show()
        NotifyIcon1.Visible = False
        Me.WindowState = FormWindowState.Normal
    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        NotifyIcon1.Icon = Me.Icon
        '  NotifyIcon1.BalloonTipIcon = "Info"      ' هذا غيره في خصائص الاداة وليس في الكود
        NotifyIcon1.BalloonTipText = "Hello Taha"
        NotifyIcon1.Visible = False
    End Sub

    Private Sub Form1_Resize(sender As Object, e As EventArgs) Handles Me.Resize
        If Me.WindowState = FormWindowState.Minimized Then
            Me.Hide()
            NotifyIcon1.Visible = True
        End If
    End Sub

ملاحظة بالنسبة للاكود في حدث تحميل النافذة يمكنك تغييرها في خصائص الأداة دون الحاجة لكتابتها في هذا الحدث .
شكرا اخي الكريم