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

نسخة كاملة : كيف يمكن وضع اداه وى جعله فى منتصف الفروم
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كيف يمكن وضع اداه وى جعله فى منتصف الفروم يعنى لو الفروم siz= 794; 530 مثلا لو تم اضافه label عاوزه تبقى فى منتصف الفروم حتا لو 794 زادو او نقصه
السلام عليكم
تفضل أخي هذا هو الكود
كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Label1.Left = (Me.ClientSize.Width - Label1.Width) / 2
        Label1.Top = (Me.ClientSize.Height - Label1.Height) / 2
    End Sub

    Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
        Label1.Left = (Me.ClientSize.Width - Label1.Width) / 2
        Label1.Top = (Me.ClientSize.Height - Label1.Height) / 2
    End Sub
جزاك الله الف خير اخى