Quantcast
Channel: MicroStation Programming Forum - Recent Threads
Viewing all articles
Browse latest Browse all 7260

RE: [V8i VBA] Automating rotated cell insertion - which Matrix3d method?

$
0
0
Function ConstructMatrix3D (ByVal degrees As Double) As Matrix3D
  Dim angle As Double
  angle = Radians (degrees)' Your angle is measured from North, so you may need to subtract 90 degrees if cell is oriented along X axis
  angle = angle - Pi()
  Const Z As Long = 2
  ConstructMatrix3D = Matrix3dFromAxisAndRotationAngle (Z, angle)
End Function


Viewing all articles
Browse latest Browse all 7260

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>