如何合并数组到一个数组中去？

Question

Function NumTable_Format(pNumTables1 As Long, pNumTables2 As Long, pNumTables3 As Long)
    for i=lbound(pnumtables1) to ubound(pnuntables1)
       pNumTables3(i)=pNumTables1(i)
    next i
for i=lbound(pnumtables2 to ubound(pnuntables2)
       pNumTables3(ubound(pnuntables1)+)=pNumTables1(i)
    next iEnd Function

Answer 1

Function NumTable_Format(pNumTables1 As Long, pNumTables2 As Long, pNumTables3 As Long)
    for i=lbound(pnumtables1) to ubound(pnumtables1)
       pNumTables3(i)=pNumTables1(i)
    next i
for i=lbound(pnumtables2 to ubound(pnuntables2)
       pNumTables3(ubound(pnumtables1)+)=pNumTables1(i)
    next iEnd Function