16horse
15th Dec 2010, 05:32 pm
Hi guys. I have written some code in VB for autocad and for the moment i am declaring the coordinates in xyz axis as following:
Private Sub CreatePoints()
SidePoints(0) = 400: SidePoints(1) = -105.25: SidePoints(2) = 215
SidePoints(3) = N(8) - 400: SidePoints(4) = -105.25: SidePoints(5) = 215
SidePoints(6) = 400: SidePoints(7) = 0: SidePoints(8) = 215
SidePoints(9) = N(8) - 400: SidePoints(10) = 0: SidePoints(11) = 215.......
For example sidepoints(0),sidepoints(1),sidepoints(2) (x,y,z) are the coordinates for one point. It would be great if i could just write Sidepoints(400,105.25,215). Is there a simpler way to declare coordinates or that is the only method?
Private Sub CreatePoints()
SidePoints(0) = 400: SidePoints(1) = -105.25: SidePoints(2) = 215
SidePoints(3) = N(8) - 400: SidePoints(4) = -105.25: SidePoints(5) = 215
SidePoints(6) = 400: SidePoints(7) = 0: SidePoints(8) = 215
SidePoints(9) = N(8) - 400: SidePoints(10) = 0: SidePoints(11) = 215.......
For example sidepoints(0),sidepoints(1),sidepoints(2) (x,y,z) are the coordinates for one point. It would be great if i could just write Sidepoints(400,105.25,215). Is there a simpler way to declare coordinates or that is the only method?