none
VB2005 Button keydown問題 RRS feed

  • 問題

  •  

    程式碼區塊

       Private Sub one_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles equ.KeyDown


           If e.KeyCode = Keys.Enter Then
                TextBox1.Text = "="
            End If
        End Sub

     

     

     

    為什麼按了enter也沒有任何事件發生

     

    但以下的能正常工作

    程式碼區塊

            If e.KeyCode = Keys.Add Then
                sum += temp
                TextBox1.Text = "+"
            ElseIf e.KeyCode = Keys.Subtract Then
                sum -= temp
                TextBox1.Text = "-"
            ElseIf e.KeyCode = Keys.Multiply Then
                sum *= temp
                TextBox1.Text = "*"
            ElseIf e.KeyCode = Keys.Divide Then
                sum /= temp
                TextBox1.Text = "/"
            End If

     

     

    應該如何解決
    2007年10月18日 下午 02:20

解答

  • HI,

     

    您可以設定Form的AcceptButton屬性, 讓使用者按下Enter鍵時觸動Button, 不需要寫程式

     

    tihs

    2007年10月19日 上午 10:27

所有回覆