- Tcl 教程
- Tcl - 首页
- Tcl - 概述
- Tcl - 环境设置
- Tcl - 特殊变量
- Tcl - 基本语法
- Tcl - 命令
- Tcl - 数据类型
- Tcl - 变量
- Tcl - 运算符
- Tcl - 决策
- Tcl - 循环
- Tcl - 数组
- Tcl - 字符串
- Tcl - 列表
- Tcl - 字典
- Tcl - 过程
- Tcl - 包
- Tcl - 命名空间
- Tcl - 文件 I/O
- Tcl - 错误处理
- Tcl - 内置函数
- Tcl - 正则表达式
- Tk 教程
- Tk - 概述
- Tk - 环境
- Tk - 特殊变量
- Tk - 小部件概述
- Tk - 基本小部件
- Tk - 布局小部件
- Tk - 选择小部件
- Tk - 画布小部件
- Tk - 超级小部件
- Tk - 字体
- Tk - 图像
- Tk - 事件
- Tk - 窗口管理器
- Tk - 几何管理器
- Tcl/Tk 有用资源
- Tcl/Tk - 快速指南
- Tcl/Tk - 有用资源
- Tcl/Tk - 讨论
Tcl - if else 语句
一个if语句后面可以跟着一个可选的else语句,当布尔表达式为假时执行。
语法
Tcl 语言中'if...else'语句的语法如下:
if {boolean_expression} { # statement(s) will execute if the boolean expression is true } else { # statement(s) will execute if the boolean expression is false }
如果布尔表达式计算结果为true,则将执行if 代码块,否则将执行else 代码块。
Tcl 语言在内部使用expr命令,因此我们不需要显式地使用expr语句。
流程图
示例
#!/usr/bin/tclsh set a 100 #check the boolean condition if {$a < 20 } { #if condition is true then print the following puts "a is less than 20" } else { #if condition is false then print the following puts "a is not less than 20" } puts "value of a is : $a"
当以上代码编译并执行时,会产生以下结果:
a is not less than 20; value of a is : 100
if...else if...else 语句
一个'if'语句后面可以跟着一个可选的else if...else语句,这对于使用单个 if...else if 语句测试各种条件非常有用。
使用 if 、else if、else 语句时,需要记住以下几点:
一个'if'可以有零个或一个else,并且它必须放在任何else if之后。
一个'if'可以有零到多个else if,并且它们必须放在else之前。
一旦一个'else if'成功,就不会再测试任何剩余的else if或else。
语法
Tcl 语言中'if...else if...else'语句的语法如下:
if {boolean_expression 1} { # Executes when the boolean expression 1 is true } elseif {boolean_expression 2} { # Executes when the boolean expression 2 is true } elseif {boolean_expression 3} { # Executes when the boolean expression 3 is true } else { # executes when the none of the above condition is true }
示例
#!/usr/bin/tclsh set a 100 #check the boolean condition if { $a == 10 } { # if condition is true then print the following puts "Value of a is 10" } elseif { $a == 20 } { # if else if condition is true puts "Value of a is 20" } elseif { $a == 30 } { # if else if condition is true puts "Value of a is 30" } else { # if none of the conditions is true puts "None of the values is matching" } puts "Exact value of a is: $a"
当以上代码编译并执行时,会产生以下结果:
None of the values is matching Exact value of a is: 100
tcl_decisions.htm
广告