参考代码
For Each f As WinForm.Form In forms output.show(f.name & " " & f.TableName & " " & f.opened)Next