|
ps = ThisDrawing.Utility.GetPoint(, vbCrLf & "请选择第一个点")
pm = ThisDrawing.Utility.GetPoint(ps, vbCrLf & "请选择第二个点")
pe = ThisDrawing.Utility.GetPoint(pm, vbCrLf & "请选择第三个点")
上面是我的程序中的一段,但当我用条调用以后,CAD的命令行就会出现下面的这个情况,就是"请选择第一个点"这个提示出现两次,这是怎么回事呢?
命令: _getjd _.-VBARUN
宏名: getjd.dvb!getjd
请选择第一个点
请选择第一个点 |
|