con el evento KeyDown :Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 45 Then MsgBox "Insert" End If If KeyCode = 46 Then MsgBox "Supr" End IfEnd Sub
Si crees que a ulisator le puede interesar o puede responder preguntas sobre algún tema, puedes recomendárselo para que lo siga.