Case Keys.F2, Keys.F3, Keys.F4, Keys.F5, Keys.F6, Keys.F7
                'Valid Keys for TAB Pages
                e.Handled = True

                Select Case e.KeyCode
                    Case Keys.F2
                        me.tabCoding.SelectedTab = Me.tab1
                    Case Keys.F3
                        me.tabCoding.SelectedTab = Me.tab2
                    Case Keys.F4
                        me.tabCoding.SelectedTab = Me.tab3
                    Case Keys.F5
                        me.tabCoding.SelectedTab = Me.tab4
                    Case Keys.F6
                        me.tabCoding.SelectedTab = Me.tab5
                    Case Keys.F7
                        me.tabCoding.SelectedTab = Me.tab6
                End Select


                Me.dgv.CurrentCell = Me.dgv(.CurrentColumn, .CurrentRow)
                Me.dgv.Focus()
                Me.dgv.BeginEdit(True)

                'I want to Highlight all the text in the cell on a return
                 Dim control As TextBox = DirectCast(Me.dgv.EditingControl, TextBox)
                 control.SelectionStart = 0
                 control.SelectionLength = control.TextLength

            Case Keys.F10
                'EXIT/SAVE don't set back to Grid
                'and don't turn off CellValidation processing
                me.tabCoding.SelectedTab = Me.tabpExit
            Case Else
                'Nothing
        End Select