Tcl - switch 語句

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 語句：

• switchingString 用於switch 語句中；透過與 matchString 比較，在不同的程式碼塊之間使用。

• 您可以在一個 switch 中擁有任意數量的 matchString 程式碼塊。

• switch 語句可以有一個可選的default 程式碼塊，該程式碼塊必須出現在 switch 的末尾。當沒有一個 case 為真時，可以使用 default 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"

當以上程式碼編譯並執行時，會產生以下結果：

Excellent!
Your grade is  B