01-01-14, 01:32 AM
هل من يشرح هذا الكود حرفيا و شكرا
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.Size = New Size(100, 20)
txt.Text = "Mohammed moh"
txt.Parent = Me
Next i
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.Size = New Size(100, 20)
txt.Text = "Mohammed moh"
txt.Parent = Me
Next i
