foreach m {file edit view} {
puts $m
}
file
edit
view
set aa [list ab te se]
foreach g $aa {
puts $g
}
ab
te
se
foreach m {file edit view} {
puts $m
}
file
edit
view
set aa [list ab te se]
foreach g $aa {
puts $g
}
ab
te
se
转载于:https://www.cnblogs.com/greencolor/archive/2011/05/02/2034524.html