Al pulsar Supr salga una p
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??
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??
Prueba con esto
If KeyCode = vbKeyDelete Then
KeyCode = 0 ' Anular el delete
SendKeys "{p}" ' Simular el tecleo de la p
End if
Saludos
If KeyCode = vbKeyDelete Then
KeyCode = 0 ' Anular el delete
SendKeys "{p}" ' Simular el tecleo de la p
End if
Saludos