switch語句可以讓一個變量值的列表進行相等測試。每個值被稱為一個的情況(case)，該變量被接通檢查每個switch case。

語法

Tcl語言未加引號的switch語句的語法如下：

switch switchingString matchString1 {body1} matchString2 {body2} ... matchStringn {bodyn}

Tcl語言未加引號的switch語句的語法如下：

switch switchingString {
   matchString1 {
      body1
   }
   matchString2 {
      body2
   }
...
   matchStringn {
      bodyn
   }
}

以下規則適用於switch語句：

• 在switch語句中使用的switchingString通過比較matchString使用在不同塊之間。

• 在一個switch內可以任何數量matchString塊。

• switch語句可以具有可選默認塊，其中必須出現在開關的末尾。缺省情況下，可用於執行任務時冇有一個case是真實的。

流程圖

例如：未加引號版本

#!/usr/bin/tclsh

set grade C;

switch $grade  A { puts "Well done!" }  B { puts "Excellent!" }  C { puts "You passed!"  } F { puts "Better try again"   }   default {     puts "Invalid grade"   }
puts "Your grade is  $grade"

當上述代碼被編譯和執行時，它產生了以下結果：

You passed!
Your grade is  C

例如：引用版本

#!/usr/bin/tclsh

set grade B;

switch $grade {
   A {
     puts "Well done!"
   }
   B {
     puts "Excellent!"
   }

   C {
     puts "You passed!"
   }
   F {
     puts "Better try again"
   }
   default {
     puts "Invalid grade"
   }
}
puts "Your grade is  $grade"

當上述代碼被編譯和執行時，它產生了以下結果：

Well done
Your grade is B