USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Coisa Estranha...
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
ENUNCIADA !
Postada em 10/09/2006 11:36 hs            
Acontece o Seguinte
 
Tenho um formulario que reconhece o evento KeyPress
Mas quando preciono uma tecla, por exemplo o numero 0, ele reconhece como se eu tivesse pressionado 2 vezes...
 
pra depurar fiz o seguinte codigo:
Sub Form_KeyPress(KeyAscii as Integer)
    Text1 = Text1 & chr(KeyAscii)
End Sub
 
No text1 deveria aparcer apenas o caracter que eu digitei, mas eu digitando apenas UM caracter,e ele aparece dobrado...
No caso de eu digitar 0, naquele text aparece "00"
 
Realmente nao sei o que esta acontecendo... tenho outros forms no mesmo projeto onde o KeyPress funciona perfeitamente...


Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn:
elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
Emoções "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

   
ghost_jlp
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 10/09/2006 22:54 hs            
Bom eu não sei o q está nos outos textboxes mas pelo q entendi é assim... ao final do evento KeyPress o caractere digitado é colocado lá... exemplo:
 
Text1 = "J"
 
Se vc digitar "0" vai aparecer "0J" pq vc digitou 0 e no código está atribuindo "J" à propriedade text do textbox. Se vc depurar vai entender o q quero dizer... qdo vc passa pela linha q coloquei acima o seu Text1 vai ter valor "J". Ao final do evento o "0" q vc digitou é colocado tb.
   
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
ENUNCIADA !
Postada em 10/09/2006 23:27 hs            
Ghost
o problema é que se eu digito UM UNICO ZERO aparecem DOIS.
Tipo eu digitei "0" e apareceu "00"


Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn:
elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
Emoções "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

   
ghost_jlp
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 10/09/2006 23:29 hs            
Mas é o q estou falando... vc digitou "0". Ele vai colocar 0 no text ao terminar o evento só q no código vc está acrescentando outro "0" então vai aparecer "00"
   
JERB RS
PELOTAS
RS - BRASIL
ENUNCIADA !
Postada em 11/09/2006 09:05 hs         
Elieser, ao invés do form, usa um outro text com a propriedade keypress
Sub Text2_KeyPress(KeyAscii As Integer)
    Text1 = Text1 & Chr(KeyAscii)
End Sub
 
funciounou... eu acho que tem a ver com a questão do focus... mas não sei fomralizar uma resposta de acordo com minha observação... mas creio que seja por ai... espero que resolva.
   
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
ENUNCIADA !
Postada em 11/09/2006 09:45 hs            
Mas ghost,
não vai colocar o "0" que eu digitei por que o FOCO NAO ESTA NO TEXTBOX.
Eu coloquei esse textbox apenas pra depurar, pra ver o que estava sendo pego no KeyPress do Form... o Focu esta em outro controle do formulario...
 
Jerb,
eu preciso usar o KeyPress do FORM por que eu não sei em qual controle estara o Focu. Preciso que a tecla seja processada independente do controle que tenha o focu...
 
Como eu disse, esse codigo funciona em outros forms do projeto. Apenas nesse ta dando esse problema...


Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn:
elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
Emoções "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

   
Página(s): 1/2      PRÓXIMA »

CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página