منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] سؤال حول خصائص الفورم - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] سؤال حول خصائص الفورم (/showthread.php?tid=24240)



سؤال حول خصائص الفورم - hadeel - 19-03-18

سلام عليكم
عندي عده اسئله بخصوص خصائص الفروم
1-كيف اجعل عنوان الفورم ااو اسم الفورم في وسط الفورم
2- كيف اجعل الادوات الموجوده عالفورم تكبر بتكبير الفورم عند التنفيذ


RE: سؤال حول خصائص الفورم - بيسك لكل العرب - 19-03-18

السلام عليكم 
تابع هذا الموضوع أخي

http://vb4arb.com/vb/showthread.php?tid=2777


RE: سؤال حول خصائص الفورم - محمود صالح - 21-03-18

للتوسيط
PHP كود :
   Private Sub Form1_Load(sender As ObjectAs System.EventArgsHandles Me.Load
        CenterMe
()
 
   End Sub
    Private Sub Form1_Resize
(sender As ObjectAs System.EventArgsHandles Me.Resize
        CenterMe
()
 
   End Sub
    Private Sub CenterMe
()
 
       Dim g As Graphics Me.CreateGraphics()
 
       Dim startingPoint As Double = (Me.Width 2) - (g.MeasureString(Me.Text.TrimMe.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
    End Sub 
منقول