日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

tcl脚本学习十一:proc应用 (带默认参数)

發布時間:2025/3/21 编程问答 47 豆豆
生活随笔 收集整理的這篇文章主要介紹了 tcl脚本学习十一:proc应用 (带默认参数) 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

lesson 11 : proc應用 (帶默認參數)


1.//使用過程的時候,不一定輸入所有的參數值。過程的輸入參數可以有默認值。默認值由
{默認參數名 默認值}指定。如果調用過程時沒有指定這些參數的值則會使用其默認值,
否則使用輸入值來替代默認值。在使用默認參數的時候要注意,如果默認參數之后還有
非默認參數,則在調用此過程的時候,默認參數的值也要求輸入,否則會出錯。這是因
為 Tcl 調用過程的時候是根據位置來匹配參數和輸入值的
2.如果參數列表中最后一個參數是 args 的話,則過程可以接收可變數目的輸入參數。當調用過
程時,除了指定參數以外的參數值都被 args 接收。如果參數列表中只有 args 一項,則 args 接
收所有輸入參數值

example ① :調用函數的返回值的用法

proc Test { a {b 7} {str "Hello world"} } {
puts "$str"
return [expr $a * $b ]
}

puts "[Test 7 7 ] "


example ② :

proc test {args} {
puts "input values are : $args"
}

test my name is zhouli

result : input values are : my name is zhouli
//驗證了開頭第二點說的

?

example ③ :

proc config_sys {args} {
array set inArr $args
parray inArr
}

config_sys -sysName "HUB100" -ipAddr 192.168.10.1 -date 2003-11-21 -time 21:03:45


result :
inArr(-date) = 2003-11-21
inArr(-ipAddr) = 192.168.10.1
inArr(-sysName) = HUB100
inArr(-time) = 21:03:45

//先放一放


//進入本課正題!!咳咳

proc example {first {second ""} args} {
if {$second == ""} {
puts "There is only one argument and it is: $first";
return 1;
} else {
if {$args == ""} {
puts "There are two arguments - $first and $second";
return 2;
} else {
puts "There are many arguments - $first and $second and $args";
return "many";
}
}
}

set count1 [example ONE]
set count2 [example ONE TWO]
set count3 [example ONE TWO THREE ]
set count4 [example ONE TWO THREE FOUR]
//例子結合了很多簡單用法,不做解釋

?

轉載于:https://www.cnblogs.com/gold-life/p/5731140.html

《新程序員》:云原生和全面數字化實踐50位技術專家共同創作,文字、視頻、音頻交互閱讀

總結

以上是生活随笔為你收集整理的tcl脚本学习十一:proc应用 (带默认参数)的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。