egua 发表于 2006-12-19 13:35:00

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

本帖最后由 作者 于 2006-12-19 13:43:34 编辑 <br /><br /> <p>maxx = -3.3<br/>Dim InsertP(0 To 2) As Double<br/>Dim TextHeight As Double<br/>Dim TextString As String<br/>Dim TextObj As AcadText<br/>InsertP(0) = 10<br/>InsertP(1) = 10<br/>InsertP(2) = 0<br/>TextHeight = 120<br/>TextString = maxx<br/>Set TextObj = mospace.AddText(TextString, InsertP, TextHeight)<br/>TextObj.Rotation = 90<br/></p><p>出来的效果却是旋转角度不是垂直于x轴方向的，而是多过30度左右，问什么呢？？</p><p>刚看了一下文字显示的旋转角度是117度！！</p>

mccad 发表于 2006-12-19 14:09:00

<p>请注意在程序中使用的应该是弧度</p>

egua 发表于 2006-12-19 14:16:00

哈哈哈，多谢多谢
页: [1]
查看完整版本: 用vb在CAD中使文字旋转90度，看我的代码什么问题～