不明白你的意思,是不是这样?
For Each frm AS Winform.Form In Forms
if frm.Name <> "窗口1" Then
frm.Close()
End if
Next
加好友 
发短信
Post By：2012/3/8 20:12:00 [显示全部帖子]
