焦点由Gridview 转到其他控件
Private Sub FocusButton()
TextEdit1.Focus()
End Sub
Private Sub GridView3_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles GridView3.KeyDown
Dim vw As GridView = CType(sender, GridView)
If e.KeyCode = Keys.Enter Then
BeginInvoke(New MethodInvoker(AddressOf FocusButton))
End If
End Sub
TextEdit1.Focus()
End Sub
Private Sub GridView3_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles GridView3.KeyDown
Dim vw As GridView = CType(sender, GridView)
If e.KeyCode = Keys.Enter Then
BeginInvoke(New MethodInvoker(AddressOf FocusButton))
End If
End Sub