求知 文章 文库 Lib 视频 Code iProcess 课程 认证 咨询 工具 火云堂 讲座吧   成长之路  
会员   
要资料
 
追随技术信仰

随时听讲座
每天看新闻
 
 

Tcl 教程
Tcl环境设置
Tcl特殊变量
Tcl基本语法
Tcl命令
Tcl数据类型
Tcl变量
Tcl运算符
Tcl决策
Tcl循环
Tcl数组
Tcl字符串
Tcl列表
Tcl字典
Tcl过程
Tcl包
Tcl命名空间
Tcl文件I/O
Tcl错误处理
Tcl内置函数
Tcl正则表达式
 
 

TCL过程
64 次浏览
13次  
 捐助

程序是什么,只不过代码块的一系列命令,提供了一个可重复使用的特定功能。它被用于避免相同的代码被重复在多个位置。程序相当于许多编程语言中使用的功能,并提供Tcl proc命令的帮助。

proc procedureName {arguments} 
{
body
}

一个简单程序的例子如下。

#!/usr/bin/tclsh
proc helloWorld {} {
puts "Hello, World!"
}
helloWorld

当执行上面的代码,产生以下结果:

Hello, World!

过程的多个参数

对于程序带参数如下图的例子所示。

#!/usr/bin/tclsh
proc add {a b} {
return [expr $a+$b]
}
puts [add 10 30]

当执行上面的代码,产生以下结果:

40

过程的可变参数

对于程序带参数如下图的例子所示。

#!/usr/bin/tclsh
proc avg {numbers} {
set sum 0
foreach number $numbers {
set sum [expr $sum + $number]
}
set average [expr $sum/[llength $numbers]] return $average
}
puts [avg {70 80 50 60}]
puts [avg {70 80 50 }]

当执行上面的代码,产生以下结果:

65
66

过程使用默认参数

默认参数是用来提供一种可如果未提供任何参数值时,可以使用默认值。对于程序用其有时称为隐式参数默认参数,一个例子如下所示。

#!/usr/bin/tclsh
proc add {a {b 100} } {
return [expr $a+$b]
}
puts [add 10 30]
puts [add 10]

当执行上面的代码,产生以下结果:

40
110

递归过程

递归过程的示例如下所示。

#!/usr/bin/tclsh
proc factorial {number} {
if {$number <= 1} {
return 1
} return [expr $number * [factorial [expr $number - 1]]] }
puts [factorial 3]
puts [factorial 5]

当执行上面的代码,产生以下结果:

6
120

您可以捐助,支持我们的公益事业。

1元 10元 50元





认证码: 验证码,看不清楚?请点击刷新验证码 必填



64 次浏览
13次
 捐助
 

每天2个文档/视频
扫描微信二维码订阅
订阅技术月刊
获得每月300个技术资源
 
 

关于我们 | 联系我们 | 京ICP备10020922号 京公海网安备110108001071号