forowhl 发表于 2011-5-18 21:09:00

怎么样在动态拖拽的时候按回车输入默认值啊

代码如下，运行的时候cad界面显示“请指定插入块角度"，这个0是选中状态的，如果我按回车的话，就不返回我输入的是0度，而是让我重新输入，求解。。。
' 定义一个角度拖动交互类.
            Dim optJigAngle As New JigPromptAngleOptions(vbCrLf & "请指定插入块角度")
            ' 设置拖拽的光标类型.
            optJigAngle.Cursor = CursorType.RubberBand
            ' 设置拖动光标基点.
            optJigAngle.BasePoint = curPt
            optJigAngle.UseBasePoint = True
            ' 用AcquireAngle函数得到用户输入的角度值.
            Dim resJigAngle As PromptDoubleResult = prompts.AcquireAngle(optJigAngle)
            temAng = resJigAngle.Value
            If AngtemAng Then
                ' 保存当前点角度值.
                MyBlock.Rotation = temAng
                Ang = temAng
                Return SamplerStatus.OK
            Else
                Return SamplerStatus.NoChange
            End If

sieben 发表于 2011-5-18 23:10:00

optJigAngle.UseDefaultValue = true;
                  optJigAngle.DefaultValue = 0;
                     optJigAngle.UserInputControls = UserInputControls.NullResponseAccepted;

forowhl 发表于 2011-5-18 23:59:00

回复
谢谢，我回去调试一下，呵呵！
页: [1]
查看完整版本: 怎么样在动态拖拽的时候按回车输入默认值啊