Point3d in MicroStation VBA
I use to do this,
Dim yAxis as Point3d
yAxis.X = 0
yAxis.Y = 1
yAxis.Z = 0
What this represents doesn't matter. What I want to show you is that you can also define the point coordinates this way,
Dim yAxis as Point3d
yAxis.X = 0: yAxis.Y = 1: yAxis.Z = 0
See, nice and compact and still readable. I like readable.



1 Comments:
Another nice way might be:
Dim yAxis as Point3d
yAxis = Point3dFromXYZ(0,1,0)
Gerald H. aka Cablewizard
Post a Comment
<< Home