明经通道 AutoLISP 函数	明经通道 AutoLISP 函数
while

对测试表达式进行求值，如果它不是 nil，则执行循环体中的表达式，重复这个过程，直到测试表达式的求值结果为 nil

(while testexpr [expr...]) 

while 函数在 testexpr 为 nil 之前不断运行。

参数

testexpr

包含测试条件的表达式。

expr

在 testexpr 为 nil 之前要求值的一个或多个表达式。

返回值

最后的 expr 表达式最新的值。

示例

下列代码调用了 10 次 some-func 函数，其参数 test 的取值从 1 到 10。最后它返回 11，因为这是它最后那个表达式的值：

(setq test 1)

(while (<= test 10)

  (some-func test)

  (setq test (1+ test))

)