DELETE A DIREITA
a tecla delete não apaga à direita, como ponho pra funcionar normalmente no programa
Porque não usa a tecla BACKSPACE?
sim, mas eu quero que a tecla delete também funcione. qual o código?
Tente este POG com uma TEXTBOX com a propriedade Name igual a Text1:
Teste e retorne o resultado aqui.
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 46 Then KeyCode = 0
End Sub
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = 46 Then
KeyCode = 0
If Len(Text1) = 0 Then Exit Sub
Text1.SelStart = Len(Text1)
Text1 = Left(Text1, Len(Text1) - 1)
Text1.SelStart = Len(Text1)
End If
End Sub
Teste e retorne o resultado aqui.
assim funciona como backspace
voce quer que ao invez do DELETE apagar tudo que esta em sua direita , ele apaga tudo que esteja a sua esquerda ?
Explica melhor como quer que funcione.
Explica melhor como quer que funcione.
Citação:MIGUELSA3 escreveu:
assim funciona como backspace
Se não resolveu, explique o motivo para que outros colegas possam ajudá-lo.
a tecla backspace apaga caracteres à esquerda e a delete apaga os caracteres à direita, só que a tecla delete não o está a fazer. Como se põe a tecla delete a funcionar normalmente?
Só posso entende que pode estar ocorrendo um dos problemas:
1-Seu controle está configurado para RightToLeft, fazendo com que o del funcione como backspace e este como del;
2-Há algum evento no seu código que está anulando o funcionamento desta tecla; ou
3-Seu teclado está com problema ou não está configurado adequadamente.
Se o seu problema for o 1o. caso, vc precisará fazer a interceptação do keydown ou keypress e enviar o keycod (SendKeys) do backspace quando for pressionado o del e vice-versa.
1-Seu controle está configurado para RightToLeft, fazendo com que o del funcione como backspace e este como del;
2-Há algum evento no seu código que está anulando o funcionamento desta tecla; ou
3-Seu teclado está com problema ou não está configurado adequadamente.
Se o seu problema for o 1o. caso, vc precisará fazer a interceptação do keydown ou keypress e enviar o keycod (SendKeys) do backspace quando for pressionado o del e vice-versa.
Tópico encerrado , respostas não são mais permitidas