VB6 Code to Validate Email Address
Esta función permite validar un correo electrónico en Microsoft Visual Basic 6 SP5. 1Public Function IsValidEmail(strEmail As String) As Boolean 2Dim names, name, i, c 3IsValidEmail = True 45names = Split(strEmail, "@") 67If UBound(names) <> 1 Then 8IsValidEmail = False 9Exit Function 10End If 1112For Each ...