Tcl While循环

Tcl While循环

在Tcl语言中， while 循环语句会在给定条件为真的情况下重复执行目标语句。

语法

Tcl语言中 while 循环的语法如下：

while {condition} {
   statement(s)
}

在这里， statement(s) 可以是单个语句或一组语句。条件 condition 可以是任何表达式，而true是任何非零值。循环在条件为true时进行迭代。

当条件变为false时，程序控制权传递到循环后面的行。

流程图

值得注意的是， while 循环可能永远不会运行。当条件被测试并且结果为假时，循环体将被跳过，并执行while循环后的第一条语句。

示例

#!/usr/bin/tclsh

set a 10

#while loop execution 
while { a<20 } {
   puts "value of a:a"
   incr a
}

当上述代码编译和执行时，会产生以下结果−

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 15
value of a: 16
value of a: 17
value of a: 18
value of a: 19