如何将两个一维字符串数组A和B合并到一个新一维数组C中?

Question

用VB怎么实现？

Answer 1

dim C() 
dim I as integer,J as Integer
redim C(ubound(A)+ubound(B)+1) 
for i=0 to Ubound(A)
c(i)=A(i)
nextfor j=i to Ubound(b)+i
c(j)=b(j-i)
next

Answer 2

dim C()  
dim I as integer,J as Integerredim C(ubound(A)+ubound(B)+1) 
 
for i=0 to Ubound(A)
    c(i)=A(i)
next ifor j=i to Ubound(b)+i
    c(j)=b(j-i)
next j

Answer 3

方法很多，比如：CopyMemory，循环....
还有取巧的方法：    dim tmp as string
    dim c() as string
    tmp=join(a) & chr(32) & join(b)
    c=split(tmp)看具体应用决定具体方法....