Al pulsar Supr salga una p

eudoxio
03 de Febrero del 2006
Es una duda muy sencilla pero que nunca he conseguido solucionar ni que nadie sepa nada.
Lo que quiero es que cuando yo pulse la tecla Supr en un Textbox me aparezca la letra p.
He probado lo siguiente sin exito, pues no hace nada:

Private Sub Text1_KeyDown(KeyCode As Integer, _
Shift As Integer)
If KeyCode = vbKeyDelete Then
KeyCode = vbKeyP
End if

End Sub

Me puede alguien ayudar??

mvallejos
03 de Febrero del 2006
Prueba con esto

If KeyCode = vbKeyDelete Then
KeyCode = 0 ' Anular el delete
SendKeys "{p}" ' Simular el tecleo de la p
End if

Saludos

eudoxio
03 de Febrero del 2006
¡¡¡¡SI SEÑOR!!!!
Muchas, muchísimas GRACIAS, mvallejos
Te lo agradezco muchísimo, nadie ha sabido contestarme...
Salu2