主题：这个表达式列该怎么写

Dim a As String  = "a9963321 北京某公司"
Dim Values() As String
Values=a.Split(" ")
Dim Index As Integer = Values.Length
 Output.Show(Values(0))

在命令窗口里执行