تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب شرح
#1
هل من يشرح هذا الكود حرفيا و شكرا
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Dim i As Integer


For i = 0 To 300 - 1 Step 20
Dim txt As New TextBox ' txt من نوع textbox
txt.Location = New Point(0, i) ' موقع txt على الفورم بدلالة 0 على اليسار و "i" على اليمين
txt.Size = New Size(100, 20) ' حجم txt
txt.Text = "Mohammed moh" هنا اكتب ما تشاء و سيتم إظهاره في جميع التاكست بوكس
txt.Parent = Me
Next i
الرد }}}}
تم الشكر بواسطة:


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم