如何获得vba的2维字符串数组的长度

Question

一个二维字符串数组a(,)
如何获得它的第一维的长度。
VB中是a.Length,vba中怎么写。

Answer 1

另外一个问题。
给一个function传字符串数组str()当参数，调用function时怎么写？是 getFunction(str）还是getFunction(str())。
写该function时参数部分如何写？是getFunction(str AS String)吗？

Answer 2

可以结合UBound和LBound来取得指定维数的最大下标和最小下标 (我不知道中文怎么说,暂且用下标代替吧,知道的告诉我啊)Dim A(1 To 100, 0 To 3, -3 To 4)LBound(A, 1) = 1 一维最小下标
UBound(A, 1) = 100 一维最大下标然后UBound - LBound + 1就是一维的维数 

Answer 3

vba数组是这么定义的啊。我还以为str(2)就是定义了一个有两个字符串的数组，原来是定义了3个。还有一个问题。

Answer 4

比如要把数组当作参数,可以这么些
Public Function MyTest(Stra() As String)
...
End Function
建议lz多看看VBA帮助文档, 这些都是基础...

Answer 5

我这里没有帮助文件，而且只能上这个网。下载也不行。st10さん能否发给我一份呢？我邮箱：[email protected] どうも有賀とございます

Answer 6

调用function时传这个数组参数怎么写呢

Answer 7

我用的帮助文档就是excel自带的帮助文档,你也有吧

Answer 8

举个例子:
Dim aa(1 To 2) As String
aa(1) = "a"
aa(2) = "b"
Call MyTest(aa)

Answer 9

所有的office安装盘都带有帮助

Answer 10

Private Sub CommandButton1_Click()
Dim str(1) As String
str(0) = "a"
str(1) = "b"
Call a(str)End SubPrivate Function a(str() As String) As Object
Dim i As IntegerFor i = 0 To UBound(str)
    Debug.Print str(i)Next
End Function

Answer 11

谢谢，要用call 调用函数啊。我直接写的函数名。