arvin19471947
چهارشنبه 17 مهر 1387, 20:38 عصر
سلام دوستان عزيز
شما خوبين ؟
دوستان يه سؤال از خدمت شما دارم
چه جوری ميشه در runtime تعداد زيادی line ايجاد کرد ؟
من از دستور زير استفاده کردم اما جواب نميده
Private Sub Form_Load()
Dim i As Integer
For i = 1 To 5
Load Line1(i)
Line1(i).Y1 = i * 100
Line1(i).Y2 = i * 100
Line1(i).Visible = True
Next i
End Sub
شما خوبين ؟
دوستان يه سؤال از خدمت شما دارم
چه جوری ميشه در runtime تعداد زيادی line ايجاد کرد ؟
من از دستور زير استفاده کردم اما جواب نميده
Private Sub Form_Load()
Dim i As Integer
For i = 1 To 5
Load Line1(i)
Line1(i).Y1 = i * 100
Line1(i).Y2 = i * 100
Line1(i).Visible = True
Next i
End Sub