在VB中，定义数组并赋值的方法有多种。以下是几种常用的方法：
使用Array类型的静态方法：
Dim arr() As Integer = Array.CreateInstance(GetType(Integer), 3) '定义一个长度为3的整数数组
arr(0) = 1 '赋值
arr(1) = 2
arr(2) = 3
使用Array类型的构造函数：
Dim arr() As Integer = New Integer() {1, 2, 3} '定义并赋值一个整数数组
使用初始化列表：
Dim arr() As Integer = {1, 2, 3} '定义并赋值一个整数数组
使用Array类型的Resize方法：
Dim arr() As Integer
Array.Resize(arr, 3) '定义一个长度为3的整数数组
arr(0) = 1 '赋值
arr(1) = 2
arr(2) = 3
注意：在VB中，数组的下标从0开始计数。上述方法可以根据需要调整数据类型和数组长度。
