主题：[分享]小玩意，仿QQ列表（5月30日更新：添加移动联系人）

For Each g As String In groups

    For Each c() As String In customers

        ........

    Next c
Next g

customers=array(array_1,array_2,..,array_i,.,array_n)

c=array_i

c是一个字符串数组

是的，省略也可以，不过多层嵌套的话，加上去比较容易区分嵌套层

重新下载个，代码略有改动。状态改变后调用初始化列表函数既可。 白天上班，不让上网……

5月30日更新：添加移动联系人