在VB中，可以使用Array函数将一个或多个值赋给数组。
如果要将单个值赋给数组，可以使用以下语法：
Dim myArray As Variant
myArray = Array(value)
其中，value是要赋给数组的值。
如果要将多个值赋给数组，可以使用以下语法：
Dim myArray As Variant
myArray = Array(value1, value2, value3, ...)
其中，value1、value2、value3等是要赋给数组的多个值。
以下是一个示例：
Dim myArray As Variant
myArray = Array(1, 2, 3, 4, 5)
以上代码将值1、2、3、4、5赋给了名为myArray的数组。