TCL foreach的用法

总结放于前：foreach var list body是foreach的的常见用法，foreach为关键字，var为形参，list为数据容器（数组等），body为函数块。程序每次在程序执行时从list中取到值并赋给形参var，函数块利用var执行对应的指令。

参考原文地址做修改：https://blog.csdn.net/ciscomonkey/article/details/118881550

本篇文章介绍的是foreach的用法，foreach属于循环控制流。

foreach var list body

第一中用法的格式如上，第一个var是一个变量，第二个list是一个有序的列表集合，第三个参数body是一个循环体。每次取得list的一个元素，然后执行一次循环体。其中变量是用于body循环体中，根据循环体内容决定是否变化。
可以这样来理解，首先这里有一筐苹果，代表list，然后有一个变量，现在我每拿出一个苹果出来啃，然后我就要去干一件事情，执行body里面的内容一次，直到我把这个框里面的苹果啃完，反正就是说我嘴里必须要啃一个苹果，只有边啃苹果我才能干这件事。

如上图所示，我现在有一筐苹果 1 2 3 4，然后我每取出一个苹果，我就将这个变量e+1

#实现功能为将a列表中的值复制到b
set b ""
foreach i $a{
set b [linsert $b 0 $i] #将a的第i个值插入list b的第0个元素之前
}

如上图所示，我是每取出一个cell名字，我就把它打印出来。

foreach var1 list1 ?var2 list2 var3 list3 …? body

上面这种格式包含了多个list，多个变量，也就是包含了第一种格式。

如上图所示，相当于我有两个变量，两个人必须同时干一件事，一个人啃苹果，一个人啃梨子，然后同时从各自的箩筐里面娶一个水果出来，然后去干一件事情。

注意：其实上面只要注意语法格式，然后结合生活来理解，还是比较简单的，主要是要有一份耐心。