列表迭代 foreach

foreach varlist1 list1varlist2 list2 …?身体

foreach 是一个强大的控制结构,允许循环遍历列表或多个列表。

set alpha [list a b c d e f]
foreach {key} $alpha {
   puts "key: $key"
}

可以指定多个变量名称。

set alphaindexes [list a 1 b 2 c 3 d 4 e 5 f 6]
foreach {key num} $alphaindexes {
   puts "key:$key num:$num"
}

可以同时迭代多个列表。

set alpha [list a b c d e f]
set indexes [list 1 2 3 4 5 6]
foreach {key} $alpha {idx} $indexes {
   puts "key: $key idx:$idx"
}