无涯教程-Tcl - break语句函数

Tcl语言中的 break 语句用于终止循环。当在循环内遇到 break 语句时，循环立即终止，程序控制在循环后的下一条语句处恢复。

break statement - 语法

Tcl中 break 语句的语法如下-

break;

break statement - 流程图

break statement - 示例

#!/usr/bin/tclsh
set a 10
# while循环执行
while {a </span><span class="pun">&lt;</span><span class="pln"> </span><span class="lit">20</span><span class="pln"> </span><span class="pun">}</span><span class="pln"> </span><span class="pun">{</span><span class="pln">
   puts </span><span class="str">"value of a: a"
incr a
if { $a > 15} {
# 使用 break 语句终止循环
break
}
}

编译并执行上述代码后，将产生以下输出-

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 15

参考链接

www.learnfk.com/tcl-tk/tcl-…