Visual Basic - Ayuda con sistema

Buenas amigos me podrían ayudar con algo que quiero hacer, En un botón tengo que se guarden todos los datos de el empleado, pero quiero hacer que si el correo no esta bien escrito de forma que tenga @ y esas cosas no deje guardar los datos de el empleado

no se el nivel de validacion pero si deseas puedes validar con una expresion regular de validacion de correos. o la simple que el text1 contenga "@" y un "."

Pero como te digo depende de que nivel de validaciones quieres llegar

Que quieres decir con nivel de validación? Podrías dar un ejemplo por favor

Pues hay niveles de validacion

una validacion "simple"
podria ser


con esto valido que el correo tenga una @ y un .

cual es el problema que si me escriben en el texto "@." me va a salir correo valido pero @. no es una direccion.


Un nivel mucho mas exigente de formato de correo es llamar una funcion como las que estan aca

https://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/95.htm

O algo que ya es nivel profesional con expresiones regulares

https://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/302-comprobar-email-con-expresion-regular.htm

buenas amigo tengo un problema a ver si me puedes ayudar, estoy usando el codigo de el primer link y ya casi cumple el proposito que yo quiero, pero tengo un problema que aunque este la direccion de correo mal escrita se guardan los datos, como podria hacer para que solo se guarden cuando este bien escrito?

me explico:
no pudiera hacer una validacion para que cuando saliera no, no dejara guardar y tuviera que corregirlo?

MsgBox "La dirección de correo : " & Text6 & vbNewLine & _
Format(Validar_Email(Text6), "Yes/No") & " ... es válida ", vbInformation

pues al presionar le boton guardar deberias hacer algo asi,

Hola amigo cuando lo voy a correr me dice error de sintaxis, alguna solución? Puse el código igual al tuyo

El problema de ese código es la palabra Function en el if. Si se tiene una Función llamada Validar_Email que devuelve un valor de True o False, la condición de la línea 1 podría ser:


Eso si el texto donde se puso el correo electrónico está en algún cuadro de texto cuyo nombre sea Text6. Otra variante (un poco más elegante) sería como sigue:


Espero que te sea útil.

Excelente acotacion, A. David

SAludos

buen dia. te paso un txt donde estan dos funciones que consegui en internet y funcionan bien...

• validar_Mail.rar(1,4 KB)