|
Postada em 20/07/2004 09:25 hs
Bom dia!!! Gostaria de saber como fazer para validar um campo text ou maskedit onde a pessoa deva preencher o seu e-mail. Muito obrigado pela atenção.
|
|
|
|
|
Postada em 20/07/2004 10:08 hs
no evento Keypress: KeyAscii = Asc(LCase(Chr((KeyAscii))) No Validate: if InStr(1,Text1,"@") = 0 Then msgbox "e-mail inválido" Cancel = true End If
________________________ Té + Que NIMB role bons Dados! 
|
|
|
|
Postada em 20/07/2004 10:13 hs
Olha esta dica é uma validação bem boa eu já uso a algum tempo
|
|
|
|
Postada em 20/07/2004 10:46 hs
Muito obrigado pelas respostas.
|
|
|