[sooriaty03]

وأيضا تستطيع اختصار الكود ليصبح بالشكل التالي

كود :

Protected Overrides Function ProcessCmdKey(ByRef msg As System.Windows.Forms.Message, ByVal keyData As System.Windows.Forms.Keys) As Boolean
        If msg.WParam.ToInt32() = CInt(Keys.Enter) AndAlso Not TypeOf Me.ActiveControl Is Button Then
            SendKeys.Send("{Tab}")
            Return True
        End If
        Return MyBase.ProcessCmdKey(msg, keyData)
    End Function