mycad 发表于 2016-3-16 10:37:52

有关split函数问题

‘请问高手,我的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 发表于 2016-3-16 13:46:16

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

mikewolf2k 发表于 2016-3-16 14:04:16

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

煽风点火聊电影 发表于 2016-4-25 14:46:19

那为什么不直接把arr=array(1,2,3,4,5,6)

mycad 发表于 2016-4-29 16:23:45

问题已经解决了,使用split(,,,)的函数,即再增加一个参数即可,split(a,",",-1,vbTextCompare)
页: [1]
查看完整版本: 有关split函数问题