Dim ls_temp As new List(Of String)For Each cn As Connection In Connections ls_temp.Add(cn.Name)Next
For Each n As String In ls_temp Connections.Delete(n)Next
加好友 
发短信
Post By：2015/5/3 22:23:00 [显示全部帖子]
