用VBA断线
大家好！我需要帮助：我有2个实体（2行）和getentity，我有3个点
我需要在这些点处打断这些线，但只有我选择的最后一条线会打断。另一个给出了一个“未找到的对象”，当我以不同的顺序选择它们时，只有最后一个再次起作用。
我用这个来打破：
B点1=此图纸。公用事业PolarPoint（基点，angapoio，3.763）
B点2=此图纸。公用事业PolarPoint（基点，angapoio2，3.763）
bpx=基点（0）
bpy=基点（1）
x1=B点1（0）
y1=B点1（1）
x2=B点2（0）
y2=B点2（1）
guarda（0）=替换（x1，“，”，“”）
guarda（1）=替换（y1，“，”，“”）
guarda1（0）=替换（x2，“，”，“”）
guarda1（1）=替换（y2，“，”，“”）
guarda2（0）=替换（bpx，“，”，“”）
guarda2（1）=替换（bpy，“，”，“”）
此图纸。SendCommand“_Break”&vbCr&guarda1（0）&“，”&guarda1（1）&vbCr&guarda2（0）&“，”&guarda2（1）&vbCr
此图纸。SendCommand“_Break”&vbCr&guarda（0）&”、“&guarda（1）&vbCr&guarda2（0）&”、“&guarda2（1）&vbCr
'结束
替换是因为vba使用“，”而不是“”然后我需要转换
如果有其他方法不用send命令就断线，请告诉我！
谢谢大家！
还有一件事
我确信cad告诉我“找不到对象”的点有一个对象
Hy公司
我也有同样的问题，在这里：http://www.cadtutor.net/forum/showthread.php?t=46321
这可能有点帮助。。。（acSelectionSetPrevious、acSelectionSetLast） 我用TRIM命令解决了这个问题
页:
[1]