我有一个带有电子邮件地址的简单文本框。
我需要知道找出该电子邮件地址是否有效的最佳和最简单的方法。我想知道如何做到这一点。
我尝试使用以下代码,但它没有显示任何消息给我?谁能指出我犯的错误?
Public Function IsValidEmailAddress(ByVal email As String) As Boolean
Try
Dim ma As New MailAddress(email)
MsgBox(True, MsgBoxStyle.Information)
Catch
MsgBox(False, MsgBoxStyle.Information)
End Try
End Function
我这样称呼这个函数:
Call IsValidEmailAddress(txtEmail.txt)
答案 0 :(得分:2)
假设您的通话代码不是拼写错误,问题是您没有使用正确的属性:
Call IsValidEmailAddress(txtEmail.txt)
应该是:
Call IsValidEmailAddress(txtEmail.Text)
我已验证IsValidEmailAddress正常工作。