tcl/tk语法--五.控制结构if

:

    if - 执行一个条件脚本

 

:

    if expr1 ?then? body1 elseif expr2 ?then? body2 elseif ... ?else? ?bodyN?

 

:

    if命令把expr1当作表达式来执行，表达式的值必须是一个布尔数（数值0代表假其它的数值代表真，字符变量true和yes代表真，false和no代表假），如果是真那么执行body1，否则expr2作为一个表达式来执行，返回真则执行body2，往下的执行以此类推。如果没有表达式的执行结果是真那么就执行bodyN。then和else变元是可选的，可以有任意数量的elseif，bodyN和else也可以省略。命令的返回值是被执行脚本的结果，如果没有被执行的脚本并且没有bodyN就返回一个空字符串。

 

:

一个简单的例子：

if {$vbl == 1} { puts "vbl is one" }

带有一个else子句：

if {$vbl == 1} { puts "vbl is one"} else { puts "vbl is not one"}

带有一个elseif子句：

if {$vbl == 1} { puts "vbl is one"} elseif {$vbl == 2} { puts "vbl is two"} else { puts "vbl is not one or two"}

表达式可以是多行的，但是在这种情况下就需要使用then关键字是结构清晰。

if { $vbl == 1 || $vbl == 2 || $vbl == 3} then { puts "vbl is one, two or three"}