Eu preciso usar uma regra para preenchimento de textbox que recebe o endereço eletrônico do cliente, e estou exigindo o uso de "@" e pelo menos um ".", e esse ponto teria q ser depois do sinal arroba, porém do jeito q estou usando
se digitar antes ele aceita. O ideal seria que usasse o "@" e exigisse um final ".com.br" ou ".com", mas não estou conseguindo. Abaixo seguem os códigos q estou usando:
If not (txtEmail.text.contains("[a-z]*@[a-z].com") or ("[a-z]*@[a-z].com.br") ) then
messagebox.show("campo e-mail invalido", "Erro no preenchimento", messageboxbuttons.ok, messageboxicon.exclamation)
txtEmail.Focus()
ReturnFalse
end if
ou
if Not(txtEmail.Text.Contains("@") AndtxtEmail.Text.Contains(".")) Then
MessageBox.Show("Campo e-mail Inválido!", "Erro de digitação", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
txtEmail.Focus()
ReturnFalse
end if