|
Postada em 07/06/2005 07:26 hs
Bom Dia... Eu fiz uma rotina que verifica se o CNPJ da empresa a ser cadastrada já existe... Evitando o cadastro do mesmo CNPJ para empresas diferentes. A pergunta é a seguinte...como faço para manter o foco dentro dessa Text até que o Digitador insira o CNPJ correto. Obrigado
|
|
|
|
arm.g
|
SÃO PAULO SP - BRASIL
|
|
Postada em 07/06/2005 09:52 hs
oi amigo tudo bem... txt_cnpj.setfocus falow... qualquer coisa... msn: armando_gioia@hotmail.com
|
|
|
|
Postada em 07/06/2005 11:19 hs
Private Sub Text1_LostFocus() If Not IsCNPJ(Text1.Text) Then 'IsCNPJ seria a funcao pra validar o cnpj Text1.SetFocus End If End Sub
Mas quero te advertir pra nao usar isso... senao o usuario vai ficar preso, e nao pode clicar em nada, nem em um botao fechar ou no (x) no canto da tela... Aconselho vc a exibir uma mensagem, caso ele saia do campo sem informar o cnpj correto. Para isso vc deve substituir no codigo acima Text1.SetFocus por uma MsgBox...
Espero ter ajudado...
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 _____________________________________________________
"O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)
|
|
|
|
Postada em 08/06/2005 08:49 hs
Obrigado pela ajuda...eu praticamente já estava usando o setfocus...mas... Eu nao estava no evento LostFocus mas sim no Validate...me expliquem O LostFocus não é problematico com esse tipo te tratamento... Muito obrigado
|
|
|
|
Postada em 08/06/2005 16:10 hs
Vc viu meu comentario... eu nao recomendo o uso... vc cae em um loop infinito caso o usuario nao queira digitar nada...
Vou te dar um conselho... jamais impeça o usuario de fazer algo. Vc deve deixar ele fazer o q quer, clicar onde nao deve, escrever o q nao deve, etc... depois vc verifica o q ele fez e dá algumas nensagens de erro... é mais facil pra programar, e mais logico pra ele entender que errou...
Imagine quanto tempo ele nao vai passar pensando porque que nao sai do campo? vai pensar q o teclado ta com problema, q o sistema deu pau, q vc nao soube fazer direito... tudo, menos q ele precisa digitar naquele campo... por isso eu recomendo q vc deixe ele sair, e depois de uma mensagem falando q nao pode deixar em branco...
Abraços...
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 _____________________________________________________
"O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)
|
|
|
Susana
|
ANGRA DOS REIS RJ - BRASIL
|
|
Postada em 08/06/2005 17:18 hs
É isso que o Elieser disse, no LostFocus coloque uma msgbox informando que o CNPJ não está correto, se o usuário não corrigí-lo, não importa, no momento da sua inclusão chame sua rotina de verificação novamente e caso o CNPJ ainda esteja incorreto, envie uma mensagem de novo e não execute a atualização. Susana
|
|
|