私はそのコードを持っており、スペースを含む単語を省略し、+ で始まるだけです...しかし、ドット、文字、ダッシュのみを許可する必要があります...もっと単純だと思います:
Imports System.Text.RegularExpressions
Public Class Contactos
ReadOnly pattern As String = "\s([^+\d\,]+),?"
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim cadena As String = " " & TextBox1.Text & ","
Dim match As Match = Regex.Match(cadena, pattern)
Do While match.Success
frmMain.ListBox1.Items.Add(match.Groups(1).ToString)
match = match.NextMatch()
Loop
End Sub
End Class
私に何ができる?
ありがとう!:)