none
[VB2010] Me.Focus 無法正常運作 RRS feed

  • 問題

  • 程式碼:
      Private Sub 熱鍵被按下()
        Me.Show()
        If Not Me.Focused Then
          Me.Focus()
          If Not Me.Focused Then
            Me.Hide()
            Me.Show()
            Me.Focus()
          End If
        End If
      End Sub
    
      Private Sub tHotkey_Timer() Handles Timer1.Tick
        Dim keyCtrl, keyAlt, keyY As Integer
        keyCtrl = 取得按鍵狀態(Keys.ControlKey)
        keyAlt = 取得按鍵狀態(Keys.ControlKey + 1)
        keyY = 取得按鍵狀態(Keys.Y)
        If keyCtrl And keyAlt And keyY Then
          熱鍵被按下()
        End If
      End Sub
    
    

    出錯函數:熱鍵被按下()

    出錯狀況:嘗試於表單非作用中時按下組合鍵 Ctrl + Alt + Y 後發現,該函數有被呼叫,但視窗沒有成為使用中。

    嘗試:先重新載入 Me.Hide() 和 Me.Show() 之後再次 Me.Focus() 還是沒有用,視窗有成功重新載入但卻還是沒有成為作用中視窗。

    2010年12月16日 上午 10:42

解答