ساختن کنترل در زمان اجرا

[visual_sadegh]

سلام دوستان
یک برنامه باید بنویسم که لازمه توی یک گروپ باکس 50 تا چک باکس ساخته بشه
من این کنترل ها رو بصورت دستی ساختم ولی می خوام اگه بشه اونها رو باکد بسازم
تا اینجاش مشکلی ندارم و با این کد جواب گرفتم

Dim P(100) As Point
Dim X, Y, I As Integer
Dim T As Long
Dim L As Long
For X = 1 To 10
For Y = 1 To 10
I += 1
GroupBox1.Controls.Add(New CheckBox)
TryCast(Me.GroupBox1.Controls(Me.GroupBox1.Control s.Count - 1), CheckBox).Left = L
TryCast(Me.GroupBox1.Controls(Me.GroupBox1.Control s.Count - 1), CheckBox).Top = T
TryCast(Me.GroupBox1.Controls(Me.GroupBox1.Control s.Count - 1), CheckBox).Text = X * Y & " " & I
L += 20
Next
T += 20
L = 0
Next

ولی نه کاملا !!!
ممکنه کمک کنید؟

[visual_sadegh]

مشکلم حل شد باید فاصله بین کنترل ها رو بیشتر کرد.