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

نسخة كاملة : طلب شرح
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
هل من يشرح هذا الكود حرفيا و شكرا
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