vba 数组如何初始化

在VBA（Visual Basic for Applications）中，初始化数组有几种方法。以下是一些常见的初始化数组的方法：

1. 声明和初始化

```vba

Dim myArray() As Integer

ReDim myArray(1 To 5) ' 初始化数组，指定大小为1到5

myArray(1) = 10

myArray(2) = 20

myArray(3) = 30

myArray(4) = 40

myArray(5) = 50

```

2. 使用数组字面量

```vba

Dim myArray() As Integer

myArray = Array(10, 20, 30, 40, 50) ' 直接使用数组字面量初始化

```

3. 使用ReDim语句动态调整大小

```vba

Dim myArray() As Integer

ReDim myArray(1 To 5) ' 初始化数组，指定大小为1到5

' 可以在需要时使用ReDim语句调整数组大小

ReDim Preserve myArray(1 To 10) ' 保留已有元素，调整大小为1到10

```

4. 使用初始化器

```vba

Dim myArray(1 To 5) As Integer

myArray = Array(10, 20, 30, 40, 50) ' 初始化数组

```

5. 使用Array函数填充数组

```vba

Dim myArray() As Integer

myArray = Array(10, 20, 30, 40, 50) ' 使用Array函数填充数组

```

在初始化数组时，如果不需要立即设置每个元素的值，可以使用默认值。对于数值数组，默认值是0；对于字符串数组，默认值是空字符串（""）。

```vba

Dim myArray(1 To 5) As Integer

' 数组被自动初始化为0

```

选择哪种方法取决于你的具体需求。通常，使用数组字面量或ReDim语句是初始化数组的常用方法。