如何将打开的所有窗口最小化.txt

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· 文本 代码 · 共 10 行

主 持 人 注 ： kddvm的 答 案 是 最 小 化 桌 面 上 的 所 有 窗 口 ， 而 gxc的 答 案 是 最 小 化 VB工 程 中 的 所 有 窗 口 。 
<END>    
你 可 用 GetWindow遍 列 所 有 的 窗 体 ， 然 后 对 每 个 窗 体 PostMessage(...)就 行 了 ， 关 于 这 两 个 函 数 SDK中 有 说 明 ， 不 用 多 说 了 吧 ？ 
<END>     
dim f as form 
    for each f in forms 
     f.windowstate=vbminimalize(是 不 是 vbminimalize自 已 查 一 下 窗 口 的 倒 数 第 三 或 四 个 属 性 ) 
    next f 
<END>