在字符串中查找空格，删除后面的所有内容

Question

希望这很简单，但似乎不是。

我在vb.net'contactname'中有一个变量。 格式就像“约翰史密斯”

我想从中得到这个名字，但似乎无法做到。

我发现并改编了谷歌的一些例子，但似乎没有任何效果:(

Answer 1

只需Split空格上的字符串并取第一个元素：

contactname.Split(" "c)(0)

Answer 2

如果您愿意，可以使用正则表达式：

Public Shared Function RegexGetForename(ByVal str As String) As String
    Dim a = New System.Text.RegularExpressions.Regex("^(\w+)")
    If a.IsMatch(str) Then
        Return a.Match(str).Value
    Else
        Return vbNull
    End If
End Function

Answer 3

Dim forename as string
Dim i = contactname.IndexOf(" ")
            If i <> -1 Then
                forename = contactname.Substring(0, i)
                MsgBox(forename)

            End If

试试吧