VB.Net Regex逗号分隔电子邮件/域验证

Question

我有一个文本框，用户可以在其中键入以逗号分隔的电子邮件地址。用户只能在正则表达式中定义的特定域内发送电子邮件。目前，我正在使用

验证输入

If Regex.IsMatch(txtEmailto.Text.Trim, "\b\w+(@abc.com)\b") = False Then MsgBox("Please enter a valid Send Email to") Exit Sub

我的正则表达式正在处理文本框中的第一个电子邮件地址，但在逗号后面没有任何内容。我想获取正则表达式，以便它会遍历所有文本，如果任何电子邮件地址在abc.com域之外，则返回false。

Answer 1

    Dim emails As String() = txtEmailto.Text.Split(",")
    For Each email As String In emails
        If Regex.IsMatch(email.Trim, "\b\w+(@abc.com)\b") = False Then
            MsgBox("Please enter a valid Send Email to")
            Exit Sub
        End If
    Next