If t.TableType = TableTypeEnum.Normal AndAlso t.IsCopy = False Then
改成
If t.TableType = TableTypeEnum.Normal AndAlso t.IsCopy = False AndAlso clsbox.items.Contains(t.name) = False Then
-------------------------或者是-----------------------------
把clsbox.items.clear清空
加好友 
发短信
Post By：2017/2/15 10:49:00 [显示全部帖子]
