[ABDULLAH HASSAN]

(26-04-24, 04:51 AM)Taha Okla كتب : وعليكم السلام ورحمة الله وبركاته

جرب الكود : 

كود :

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.Top = Me.Top - 2 * Screen.PrimaryScreen.Bounds.Height
    End Sub

    Private Sub Form1_Shown(sender As Object, e As EventArgs) Handles MyBase.Shown
        Me.Visible = False
        Me.Top = Me.Top + 2 * Screen.PrimaryScreen.Bounds.Height
    End Sub

جربت الكود ولاكن نفس المشكله ظهور الفورم لوهله

---

(26-04-24, 07:03 AM)justforit كتب :



لقطة صامتة للكيفية

الكود مضبوط بارك الله فيك وتم استخدامه جزاك الله خير