Tcl - 决策语句

决策结构要求程序员指定一个或多个由程序评估或测试的条件，以及如果确定条件为 true 则要执行的一个或多个语句，以及可选的如果确定条件为 false 则要执行的其他语句。

以下是大多数编程语言中典型决策结构的一般形式 −

Tcl语言内部使用expr命令，因此我们不需要显式使用expr语句。

Tcl语言提供以下类型的决策语句 −

序号	语句与描述
1	if 语句 "if"语句由一个布尔表达式后跟一个或多个语句组成。
2	if...else 语句 "if"语句后面可以跟一个可选的"else"语句，该语句在布尔表达式为 false 时执行。
3	嵌套 if 语句您可以在另一个"if"或"else if"语句内使用一个"if"或"else if"语句。
4	switch 语句 switch 语句允许测试变量是否与值列表相等。
5	嵌套 switch 语句您可以在另一个 switch 语句中使用一个 switch 语句。

? : 运算符

我们在前面的章节中介绍了条件运算符 ? :，它可以用来替换if...else语句。它具有以下一般形式 −

Exp1 ? Exp2 : Exp3;

其中 Exp1、Exp2 和 Exp3 是表达式。注意冒号的使用和位置。

Exp1 被评估，如果为 true，则对 Exp2 进行求值，并成为整个表达式的值。如果 Exp1 为 false，则计算 Exp3 并且其值成为表达式的值。例子如下所示。

#!/usr/bin/tclsh

set a 10;
set b [expr $a == 1 ? 20: 30]
puts "Value of b is $b\n"
set b [expr $a == 10 ? 20: 30]
puts "Value of b is $b\n"

当你编译并执行上面的程序时，它会产生以下结果 −

Value of b is 30
Value of b is 20