用vb在CAD中使文字旋转90度，看我的代码什么问题～

egua

maxx = -3.3
Dim InsertP(0 To 2) As Double
Dim TextHeight As Double
Dim TextString As String
Dim TextObj As AcadText
InsertP(0) = 10
InsertP(1) = 10
InsertP(2) = 0
TextHeight = 120
TextString = maxx
Set TextObj = mospace.AddText(TextString, InsertP, TextHeight)
TextObj.Rotation = 90

出来的效果却是旋转角度不是垂直于x轴方向的，而是多过30度左右，问什么呢？？

刚看了一下文字显示的旋转角度是117度！！

mccad

请注意在程序中使用的应该是弧度

egua

哈哈哈，多谢多谢