肥多 发表于 2002-5-24 16:28:00

关于selectonscreen得一个疑问？-->mccad转移

执行selectonscreen后
acad提示选择对象，之后可选择多个对象
问：
能不能只选择一个对象？

谢谢！

mccad 发表于 2002-5-24 16:52:00

ThisDrawing.Utility.GetEntity

Public dimAliObj As AcadEntity
Public PickPnt As Variant

On Error Resume Next    ' 改变错误处理的方式。
ThisDrawing.Utility.GetEntity dimAliObj, PickPnt, "选择标注尺寸："
If Err <> 0 Then
    Exit Sub
End If
页: [1]
查看完整版本: 关于selectonscreen得一个疑问？-->mccad转移