vArr = astr   '‘’‘’‘’‘’这句话什么意思?,是不是取得数组指针?
    '设置vArr为一个和astr(10)相同的数组vArr = Split("a/od/os/p/", "/") '如果改为astr=Split("a/od/os/p/", "/")‘就显示错误说不能直接给数组赋值,为什么不能直接给数组astr赋值?
    'astr要astr=Split("a/od/os/p/", "/"),在声明astr的时候应该是这样:dim astr()
    '以上的定义我认为是分不规范,不建议使用。
    '最好是这样:
    Dim vArr2() As String
    vArr2 = Split("a/od/os/p/", "/")

解决方案 »

  1.   

    同意楼上所说:
    vArr = astr   '是要设置一个相同的数组,但是记住这2个数组是完全独立的,不是你所说的将数组地址给vArr 如果你将上面改为:
    Private Sub Command1_Click()
        Dim vArr As Variant
        Dim astr(10)
        
        vArr = astr   ’‘’‘’‘’‘’这句话什么意思?,是不是取得数组指针?
        vArr = Split("a/od/os/p/", "/")‘如果改为astr=Split("a/od/os/p/", "/")‘就显示错误说不能直接给数组赋值,为什么不能直接给数组astr赋值?
        Debug.Print vArr(0)
        
        For i = LBound(vArr) To UBound(vArr)
        If vArr(i) <> "" Then
        debug.print  vArr(i)
        debug.print astr(i)
        End If
        Next i
    End Sub你会发现astr数组里面全是空的,可见这2个数组是独立