文章編號: 194914 - 上次校閱: 2004年7月14日 - 版次: 3.2

如何從 Visual Basic 的所有視窗最小都化

系統提示本文適用於您使用的作業系統之外的作業系統。與您不相關的文章內容已停用。

在此頁中

全部展開 | 全部摺疊

結論

有時候您想要以程式設計方式將所有的可見視窗最小化。使用 API keybd_event,這可輕鬆地完成。

其他相關資訊

訣竅是模仿帶工作列的快顯功能表,並將其傳送字母 「 M 」 選取 [最小化所有視窗 」 選項所需的鍵盤事件。這是具有三個 keybd_event API 的呼叫來完成。

第二個引數為 keybd_event 呼叫是硬體掃描程式碼,並在這種情況下您可能使用值 91]。不過,因為應用程式不應使用掃描程式碼,它保留為 0。

雖說是逐步範例

  1. 啟動新的標準 EXE 專案。預設會建立 Form1。
  2. 將放置指令按鈕至 Form1。
  3. 複製並貼入 Form1 的程式碼視窗中的下列程式碼。
          Private Declare Sub keybd_event Lib "user32" ( _
             ByVal bVk As Byte, _
             ByVal bScan As Byte, _
             ByVal dwFlags As Long, _
             ByVal dwExtraInfo As Long)
    
          Const KEYEVENTF_KEYUP = &H2
          Const VK_LWIN = &H5B
    
          Private Sub Command1_Click()
             ' 77 is the character code for the letter 'M'
             Call keybd_event(VK_LWIN, 0, 0, 0)
             Call keybd_event(77, 0, 0, 0)
             Call keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP, 0)
          End Sub
    
    						
  4. 按下 F5 鍵以執行應用程式和 Click Command1 上。所有可見視窗將會降到最低。

?考

如需詳細資訊請搜尋 keybd_event 在 Win32 程式設計人員參考或 [Microsoft 開發 o 人 h 員 ? 工 u 具 ? 網路 (MSDN) 程式庫 CD-ROM 上。

這篇文章中的資訊適用於:
  • Microsoft Visual Basic 5.0 Learning Edition
  • Microsoft Visual Basic 6.0 Learning Edition
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
  • Microsoft Visual Basic 4.0 Standard Edition
  • Microsoft Visual Basic 4.0 Professional Edition
  • Microsoft Visual Basic 4.0 32-Bit Enterprise Edition
關鍵字:?
kbmt kbapi kbhowto KB194914 KbMtzh
機器翻譯機器翻譯
重要:本文是以 Microsoft 機器翻譯軟體翻譯而成,而非使用人工翻譯而成。Microsoft 同時提供使用者人工翻譯及機器翻譯兩個版本的文章,讓使用者可以依其使用語言使用知識庫中的所有文章。但是,機器翻譯的文章可能不盡完美。這些文章中也可能出現拼字、語意或文法上的錯誤,就像外國人在使用本國語言時可能發生的錯誤。Microsoft 不為內容的翻譯錯誤或客戶對該內容的使用所產生的任何錯誤或損害負責。Microsoft也同時將不斷地就機器翻譯軟體進行更新。
按一下這裡查看此文章的英文版本:194914? (http://support.microsoft.com/kb/194914/en-us/ )
Microsoft及(或)其供應商不就任何在本伺服器上發表的文字資料及其相關圖表資訊的恰當性作任何承諾。所有文字資料及其相關圖表均以「現狀」供應,不負任何擔保責任。Microsoft及(或)其供應商謹此聲明,不負任何對與此資訊有關之擔保責任,包括關於適售性、適用於某一特定用途、權利或不侵權的明示或默示擔保責任。Microsoft及(或)其供應商無論如何不對因或與使用本伺服器上資訊或與資訊的實行有關而引起的契約、過失或其他侵權行為之訴訟中的特別的、間接的、衍生性的損害或任何因使用而喪失所導致的之損害、資料或利潤負任何責任。