Question

如何在VB的很多个一维数组里找一个字符出现的次数，及在每个一维数组里的位置？

比如有30个字符型一维数组,每个数组的元素个数都不一样
dim a(9) as string
..................
dim x(8) as string
dim TemStr as string

TemStr="5"
A(9)=0,1,2,3,4,5,6,7,8,9
B(10)=1,2,3,4,5,6,7,8,10,11,20
C(9)=2,3,4,6,7,8,9,0,10,99
D(12)=5,6,7,8,9,0,11,23,100,33,22,45
...................
x(8) ‘这是第30个一维数组

这些都字符型，不是数字。
我想统计出字符 "5" 都在哪个数组里。
用什么方法？

统计出来的表达式为
TemStr="A(5)" & "B(4)" & .........

嗯。这次我表达得应该清楚了吧

Answer 1

你的数组之间没任何联系？字符在每个数组只出现一次？
如果上面都回答是，可以参照下面的格式写30个循环：
'处理数组A
for i=0 to UBound(A)
if strFind=A(i) then
TempStr =TempStr & "A(" & i & ");"
nCount = nCount+1
exit for
endif
next

strFind 要查找的字符
nCount 字符总的出现次数

追问

嗯。谢谢。我也是烦这个。
怎么样让这些数组有联系？
我就是想怎么实现联系。
或者让那个字符的变量和那些数组关联？？

Answer 2

要实现不难，但很烦，汗

追问

嗯，是啊。很烦。
我就想找比较容易的方法。
比如只要几次循环就可以解决的。

Answer 3

半折