将字符串拆分为多个变量

Question

我试图将字符串拆分为要存储到多个变量的数据。 我的字符串由以不同（随机）数量的空格分隔的数据组成。

"Mike Smith           123     23          33   2 1" 

我尝试使用string.split方法，但是在存储数字数据时遇到问题。

Dim strUserInfo As String
    Dim strFirstName, strLastName As String
    Dim intAvg, intHcp, intTotalPins, intGamesTracked As Integer
    strUserInfo = lstUsers.SelectedItem.ToString
    Dim strarr() As String
    strarr = strUserInfo.Split("."c)
    strFirstName = strarr(0)
    strLastName = strarr(1)

Answer 1

如果您不知道每个节之间有多少空格，则可能要使用StringSplitOptions.RemoveEmptyEntries的Split重载，如下所示：

strarr = strUserInfo.split(New Char() { " "c }, StringSplitOptions.RemoveEmptyEntries)

而且，当您要将Integer变量存储在Integer变量中时，请使用CInt （或Integer.Parse ），如下所示：

strFirstName = strarr(0)
strLastName = strarr(1)
intAvg = CInt(strarr(2))
intHcp = CInt(strarr(3))
intTotalPins = CInt(strarr(4))
intGamesTracked = CInt(strarr(5))

Answer 2

解析它的另一种方法是使用正则表达式：

Imports System.Text.RegularExpressions

Dim input As String = "Mike Smith           123     23          33   2 1"
Dim matches = Regex.Matches(input, "\w+")
Dim output = (From match As Match In matches Select match.Value).ToArray