VB.NET中怎么解析电子邮件地址，很多新手对此不是很清楚，为了帮助大家解决这个难题，下面小编将为大家详细讲解，有这方面需求的人可以来学习下，希望你能有所收获。
此示例演示一个用于分析电子邮件地址的简单的正则表达式。
此示例使用正则表达式 (\S+)@([^\.\s]+)(?:\.([^\.\s]+))+，该表达式的意思是：
一个或多个非空格字符集（已捕获），后跟字符“@”，后跟一个或多个非空格和非句点字符集（已捕获），后跟一个或多个以下各项：
字符“.”，后跟一个或多个非空格和非句点字符集（已捕获）。
正则表达式的 Match 方法返回一个 Match 对象，该对象包含有关正则表达式与输入字符串的哪一部分相匹配的信息。
VB.NET分析电子邮件地址代码示例：
计算
安全
数据库
网络和加速
企业服务
''' < summary> ''' Parses an e-mail address into its parts. ''' < /summary> ''' < param name="emailString">E-mail address to parse.< /param> ''' < remarks> For example, this method displays the following ''' text when called with "someone@mail.contoso.com": ''' User name: someone ''' Address part: mail ''' Address part: contoso ''' Address part: com ''' < /remarks> Sub ParseEmailAddress(ByVal emailString As String) Dim emailRegEx As New Regex("(\S+)@([^\.\s]+)(?:\.([^\.\s]+))+") Dim m As Match = emailRegEx.Match(emailString) If m.Success Then Dim output As String = "" output &= "User name: " & m.Groups(1).Value & vbCrLf For i As Integer = 2 To m.Groups.Count - 1 Dim g As Group = m.Groups(i) For Each c As Capture In g.Captures output &= "Address part: " & c.Value & vbCrLf Next Next MsgBox(output) Else MsgBox("The e-mail address cannot be parsed.") End If End Sub 看完上述内容是否对您有帮助呢？如果还想对相关知识有进一步的了解或阅读更多相关文章，请关注亿速云行业资讯频道，感谢您对亿速云的支持。
亿速云「云服务器」，即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘，价格低至29元/月。点击查看>>
免责声明：本站发布的内容（图片、视频和文字）以原创、转载和分享为主，文章观点不代表本网站立场，如果涉及侵权请联系站长邮箱：is@yisu.com进行举报，并提供相关证据，一经查实，将立刻删除涉嫌侵权内容。
