有一些文本框,我想用tab或enter键进行接换,就是输入完以后,用tab或enter切换到下一格。

解决方案 »

  1.   

    Private Sub Text1_KeyPress(KeyAscii As Integer)
        If KeyAscii = 13 Then
            Text2.SetFocus
        End If
    End Sub
      

  2.   

    如果想简单的话,将formr的keypreview设为true,然后:Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
        If KeyCode = 13 Then
            SendKeys "{Tab}"
        End If
    End Sub不过这样做必须将你的控件的tabindex属性排列好。^_^
      

  3.   

    tabindex??
    怎么排列??
      

  4.   

    例如A移到B,那么A的tabindex=0,B的tabindex就等于1,依次类推。^_^
      

  5.   

    用enter的话怎么办???
      

  6.   

    晕,我的代码就是enter移动。^_^