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

نسخة كاملة : سؤال في اسم الفورم اثناء التصميم والتشغيل
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته

1-ازاي يكون اسم الفورم في المنتصف اثناء التصميم والتشغيل ؟

2- كذلك لون الفورم كيف اتحكم فيه اثناء التصميم والتشغيل؟

بعض من اخواننا تكرم ووضع كود لجعل اسم الفورم في المنتصف ولكن هذا في وقت التشغيل فقط فهل توجد طريقه لجعل الاسم في المنتصف
تفضل هذ الكود يجعل عنوان الفورم في المنتصف


كود :
 Dim g As Graphics = Me.CreateGraphics()
        Dim startingPoint As Double = (Me.Width / 2) - (g.MeasureString(Me.Text.Trim, Me.Font).Width / 2)
        Dim widthOfASpace As Double = g.MeasureString(" ", Me.Font).Width
        Dim tmp As String = " "
        Dim tmpWidth As Double = 0
        Do
            tmp += " "
            tmpWidth += widthOfASpace
        Loop While (tmpWidth + widthOfASpace) < startingPoint
        Me.Text = tmp & Me.Text.Trim & tmp