Tcl - Declaração de mudança

UMA switchdeclaração permite que uma variável seja testada quanto à igualdade em relação a uma lista de valores. Cada valor é chamado de caso, e a variável que está sendo ligada é verificada para cadaswitch case.

Sintaxe

A sintaxe para não citados switch declaração na linguagem Tcl é a seguinte -

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

A sintaxe para não citados switch declaração na linguagem Tcl é a seguinte -

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

As seguintes regras se aplicam a um switch declaração -

o switchingString é usado em um switchdeclaração; usado entre os diferentes blocos comparando com o matchString.
Você pode ter qualquer número de blocos matchString em um switch.
UMA switch declaração pode ter um opcional defaultbloco, que deve aparecer no final do switch. O caso padrão pode ser usado para executar uma tarefa quando nenhum dos casos for verdadeiro.

Diagrama de fluxo

Exemplo: versão não cotada

#!/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"

Quando o código acima é compilado e executado, ele produz o seguinte resultado -

You passed!
Your grade is  C

Exemplo: versão citada

#!/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"

Quando o código acima é compilado e executado, ele produz o seguinte resultado -

Excellent!
Your grade is  B

↰ Previous page