1. 程式人生 > >tcl/tk參考——控制結構if

tcl/tk參考——控制結構if

.

.

名稱

if - 執行一個條件指令碼

語法

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

描述

if命令把expr1當作表示式來執行,表示式的值必須是一個布林數(數值0代表假其它的數值代表真,字元變數trueyes代表真,falseno代表假),如果是真那麼執行body1,否則expr2作為一個表示式來執行,返回真則執行body2,往下的執行以此類推。如果沒有表示式的執行結果是真那麼就執行bodyNthenelse變元是可選的,可以有任意數量的elseifbodyNelse

也可以省略。命令的返回值是被執行指令碼的結果,如果沒有被執行的指令碼並且沒有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"
}