VB中沒有提供定義數(shù)組并同時初始化其內(nèi)容的方法，所以大多數(shù)情況下，必須單獨地設置每一個元素，就象下面一樣：

DimstrArray(0To3)AsString

strArray(0)="S

在VB6中，同樣能充分利用函數(shù)返回數(shù)組的能力，創(chuàng)建數(shù)組初始化程序段。比如下面的代碼段：

FunctionArrayInt(ParamArrayvalues()AsVariant)AsInteger()

DimiAsLong

ReDimres(0ToUBound(values))AsInteger

Fori=0ToUBound(values)

res(i)=values(i)

Next

ArrayInt=res()

EndFunction

同時，也可以創(chuàng)建一個子程序段來檢測傳遞給它的數(shù)值的類型，并返回正確類型的數(shù)組。這種情況下，函數(shù)應該定義為返回Variant。