تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] طريقة تصغير المشروع
#2
وعليكم السلام ورحمة الله وبركاته:
قم باضافة اداة (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

ملاحظة بالنسبة للاكود في حدث تحميل النافذة يمكنك تغييرها في خصائص الأداة دون الحاجة لكتابتها في هذا الحدث .
قال صلى الله عليه وسلم: 
«كلمتان خفيفتان على اللسان 
ثقيلتان في الميزان،حبيبتان إلى الرحمن: 
سبحان الله وبحمده، سبحان الله العظيم».
الرد }}}


الردود في هذا الموضوع
RE: طريقة تصغير المشروع - بواسطة Taha Okla - 30-01-22, 06:39 PM


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


يقوم بقرائة الموضوع: