如题: 帮助中找到了!!
Dim Multi As String ="张山,李四,王五"Dim Values() as StringValues = Multi.split(",")For Index As Integer = 0 To Values.Length - 1 Output.Show(Values(Index)) Next