能否将程序内部定义的对象传递到命令行上?
如程序内部的一直线对象acLine,用Sendcommand运行某一命令需选择直线时,需要直接引用acLine对象,那怎么把acLine传递到命令行上?用Handle可以把选中的传递到命令行。 非常感谢fjfhgdwfn,不知能够讲的更具体些,例如下面一段应该怎么写?
sub tt()
Set AcLine = ThisDrawing.ModelSpace.AddLine(stPt, enPt)
ThisDrawing.SendCommand "_rotate" .....
end sub
'参考代码如下
ThisDrawing.SendCommand "_rotate " _
& "(handent " & Chr(34) & AcLine.Handle & Chr(34) & " )" & Chr(32) & Chr(32) _
& "0,0,0 " & "90" & Chr(32)
非常感谢jkbanana的热心指点,谢谢。
页:
[1]