文章編號: 251321 - 上次校閱: 2004年6月24日 - 版次: 3.0

注意: 捲軸控制項出現的 [小畫家問題變更事件中執行程式碼時

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

在此頁中

全部展開 | 全部摺疊

徵狀

在 [Microsoft Visual Basic,內建的 HScrollBarVScrollBar 控制項繪製問題如果遇到關閉之前要變更事件中的程式碼執行完成控制移動滑鼠。

解決方案

如果要解決這個問題,就可以停用捲軸控制項開頭的 Change 事件。程式碼執行完成後控制項可以再啟用一次。
Private Sub HScroll1_Change()
   HScroll1.Enabled = False

   ' place your code here 

   HScroll1.Enabled = True
End Sub
				

狀況說明

Microsoft 已確認這是在本文開頭所列之 Microsoft 產品中的有錯誤。

其他相關資訊

重製行為的步驟

  1. 啟動新的 Visual Basic 標準 EXE 專案。預設會建立 Form1。
  2. HScrollBar 控制項加入至 Form1。
  3. 將下列程式碼加入至 Form1 的一般宣告區段:
    Private Sub HScroll1_Change()
        t = Timer
        While Timer < (t + 2)  ' to give you time to move the mouse
            DoEvents
        Wend
    End Sub
    					
  4. 按下 F5 鍵以執行程式。
  5. 按一下 [上 HScrollBar 控制項的 「 向右箭號。請注意使用的狀態中出現的向右箭號。
  6. HScrollBar 的 「 向右箭號會回到引發狀態之前移動關閉 HScrollBar 控制滑鼠,將滑鼠放在 Form1 的用戶端區域的任何部分。
  7. HScrollBar 向傳回凸起的狀態時,按一下 HScrollBar 捲動方塊上的一次。附註捲動方塊會收到焦點,並開始閃爍。
  8. 拖曳 HScrollBar 捲動方塊來將控制項的右邊。請注意,[向右] 和 [向左箭號 HScrollBar 控制項的是現在選取及使用的狀態。

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