请问下面这个表达式哪里不对？我想对象数量赋值给ss2
(setq ss2 (sslength ss1))这个表达式返回值ss2 ,为什么是个选择集？我不太明白 你怎么知道 ss2 是选择集。
带 ss 就一定是选择集吗？
代码没有问题
是后面又对ss2赋值了吧
另外
定义参数名称要有一定规律
比如选择集数量
可以定义为n2或n_ss2 可能由于SS1是空集产生赋值错误，要是这样的话，应该在前面做一个空集判断，如果SS1不等于NIL，再赋值。另外， 建议同楼上，参数名不要用SS2，可以用n1，nn, nb 等等，免得和SS1混淆，自己都不认得。 本帖最后由 lee50310 于 2022-6-4 09:57 编辑
首先你要先了解 sslength 指令 的用途 ,他的作用是統計選擇集的數量
因為你 選擇集變數 ss1 是 空的 無值 為 nil 如果有值他會回應類似<Selection set: 9>
所以 執行 (sslength ss1) 統計一個 nil空集合數量 當然會錯誤
需在這式子之前加上 ssget指令
例:
(setq ss1(ssget)) ;選取元體
(setq ss2(sslength ss1)) ;統計選擇集數量
因此你可在 cad螢幕下畫 三個圓 然後執行下面函式
執行指令:tt
再選這3個 圓
;------------------------------------------------------
(defun c:tt()
(setq ss1(ssget)) ;選取元體
(setq ss2(sslength ss1)) ;統計選擇集數量
(alert(strcat "選取數量=" (rtosss22 0) "個" ) );提示選取的數量
)
;-------------------------------------------------------
页:
[1]