CHR E KEYCODE
eu tenho uma aplicação que eu devo digitar um conteúdo em um controle mas ele deve escrever em outro controle. Só que precisa ser no keydown, então eu fiz assim:
até aqui está funcionando bem, só que eu também tenho que considerar o caracter Ç (keycode 186). tentei colocar nos dois tratamentos que tem ali, mas nos dois ele não passou Ç para o outro controle, e sim passou um caracter inválido. o que eu faço?
Select Case KeyCode
Case vbKeyA To vbKeyZ, vbKey0 To vbKey9
.Text = .Text & Chr(KeyCode)
Case vbKeyNumpad0 To vbKeyNumpad9
.Text = .Text & Chr(KeyCode - 48)
End Select
até aqui está funcionando bem, só que eu também tenho que considerar o caracter Ç (keycode 186). tentei colocar nos dois tratamentos que tem ali, mas nos dois ele não passou Ç para o outro controle, e sim passou um caracter inválido. o que eu faço?
Eu fiz isso aqui e funcionou:
Case 186
.Text = .Text & Chr(KeyCode + 13)
Tópico encerrado , respostas não são mais permitidas