[RaggiTech]

كاتب الموضوع : م إسماعيل علي النجار

السلام عليكم

اليوم سنتعلم طريقة إضافه مثلا زر والتحكم في الخط عليه ولونه بالاكواد

وكذلك إضافه text box والتحكم في لون الخط ومكان التيكست علي الفورم

بسم الله

عند فتح فورم فارغ يظهر لنا هذا الكود

كود :

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class

ثم نضيف هذا الكود

كود :

Dim btn As New Button()

With btn
.Location = New Point(30, 30)
.Text = "hi"
.ForeColor = Color.Yellow

End With
Me.Controls.Add(btn)

ليكون الكود الكلي

كود :

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim btn As New Button()

With btn
.Location = New Point(20, 20)
.Text = "bnnnn"
.ForeColor = Color.Yellow

End With
Me.Controls.Add(btn)
End Sub
End Class

في الكود السابق تم التالي

حجز مكان لل btn في الذاكره

ثم نأتي لخصائص الزر المضاف للفورم ( عن طريق الكود )

تم تحديد ال location

وكذلك تحديد text التي ستظهر علي الزر

وكذلك تم تحديد لون الخط الموجود

ويمكن إضافة الكثير من الادوات علي الفورم بهذه الطريقه السهله

تحياتي