如比说吧
有text1,text2
当在text1中回车是,光标回到text2中。
这个怎么实现呀,搞了半天还是没反应
等待

解决方案 »

  1.   

    Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
        If KeyCode = 13 Then
            Text2.SetFocus
        End If
    End Sub
      

  2.   

    wangtopcool(逆水行舟,不进则退)Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
        If KeyCode = 13 Then
            Text2.SetFocus
        End If
    End Sub如果这样写的话,当然是可以实楼作所说的功能,但是在你每次敲击回车的时候,系统都会发出“滴”的声音。
    如果将Text2.SetFocus改为SendKeys "{tab}"。
    这样可以消除声音的烦恼。