有关split函数问题

mycad

‘请问高手，我的cad是2010版本，使用split函数分解字符串时出现了一个奇怪的现象

’按道理应该是arr(0)=1;arr(1)=2;arr(2)=3;。。。arr(5)=6;
'在我的电脑中输出的结果是：arr(0)=;arr(1)=,2,3,4,5,6;这是错误的结果，不知是什么原因？
'请高手赐教，谢谢


Sub tt2() '20160316
    Dim s As String
    Dim sl As String
    Dim i As Integer

    Dim arr() As String

    s = "1,2,3,4,5,6"

    arr = Split(s, ",")

    For i = 0 To UBound(arr)
        sl = sl + "arr(" + str(i) + ")=" + arr(i) + ";"

    Next i
    MsgBox sl
End Sub

Kye

我没有学过VBA
图片用vb6 运行你程序的结果

mikewolf2k

2012vba结果同沙发，没问题。2010带的vba也是vb6吧？建议楼主一步步的执行看出了什么问题。
另外如果字符串的话，建议用&而不用+，免得混淆。

煽风点火聊电影

那为什么不直接把arr=array(1,2,3,4,5,6)来自: Android客户端

mycad

问题已经解决了，使用split(,,,)的函数，即再增加一个参数即可，split(a,",",-1,vbTextCompare)