我们知道Split是用于返回数组的：
Sub test()
Dim arr As Variant
arr = Split("abc,bcd,cde", ",")
Debug.Print arr(1)
End Sub
当然，我们也可以只split "abc",这时候返回的数组是一个1维的数组：
Sub test()
Dim arr As Variant
arr = Split("abc", ",")
Debug.Print arr(1)
End Sub
可以看到就算被切的字符串就算没有 ",", 也是可以切的
