【当你认为全部都完成的时候】-检查Alt+E的Focus/Enter Quit & Delete Quit的Highlight位置

检查Alt+E的Focus/Enter Quit & Delete Quit的Highlight位置

1.
Private Sub btnPEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPEdit.Click
If Me.btnPEdit.Enabled = False Then Exit Sub
Try
Call btnEdit_Click(sender, e)
Me.txtClassification.Select()
Catch ex As Exception
MsgBox("<f01ClassificationEdit.btnPEdit_Click> " & ex.Message)
End Try
End Sub

3.
Private Sub f01CostTypeMaster_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
Try
Select Case e.KeyCode
Case Keys.Return
If dgv01CostTypeMaster.Focused Then
e.SuppressKeyPress = True
pShowViewMode()
Else
System.Windows.Forms.SendKeys.Send("{TAB}")
End If
Case Keys.Escape
Call btnExit_Click(sender, e)
End Select
Catch ex As Exception
MsgBox("<f01CostTypeMaster.f01CostTypeMaster_KeyDown> " & ex.Message)
End Try
End Sub