
How to manipulate with ControlName
I was trying:
For lineseg = 1 To 10
Set ControlName = Controls.Add("VB.Line", "aLine" & lineseg)
ControlName.Name = "Line" & lineseg
If ((ControlName.x1 < ControlName.X2) And (ControlName.y1 <
ControlName.Y2)) Then
count = Sqr(Pow(ControlName.y1 - ControlName.Y2) +
Pow(ControlName.X2 - ControlName.x1))
End If
Next lineseg
But not successful, can anyone help?
Thanks
Jack