Private Sub Form_Load()
DataGrid1.TabStop = False
End Sub
Private Sub Text1_Change()
DataGrid1.SetFocus
End Sub
Private Sub Text1_GotFocus()
MsgBox "el textbox tiene el foco"
End Sub
Private Sub DataGrid1_GotFocus()
MsgBox "datagrid obtiene el fco"
End Sub