|
代码:
Set sSet1 = AcadDoc.SelectionSets.Add("Pczx2006" & Trim(Str(AcadDoc.SelectionSets.Count + 1)))
Call sSet1.Select(acSelectionSetCrossing, Pnt1, Pnt2, GroupCode, DataCode)
运行前文本窗口界面:
vbxxwgfkism.png
运行后文本窗口界面:
b3af2xxoc3a.png
现象:执行上述代码后,对比文本窗口多了一个空行。
问题:设置哪个变量,可以避免出现这种空行现象? |
|