VB中如何给一维字符串数组赋值

    字符串数组的定义：

Dim arr(1 to 3) as string

如此定义，但是不能直接给数组赋值

如果想直接给数组直接赋值，需要如下操作：

Dim arr() as Variant

arr=Array("a","b","c")

为什么呢？

因为Array函数的赋值对象一定是一维数组，其类型为Variant，并且一定未指定数组大小。