今日学习目标

  • 掌握多维数组
  • 学会动态数组
  • 掌握数组函数

知识点

数组操作

  • Array()：创建数组
  • UBound()：上界
  • LBound()：下界
  • Erase：清空数组
  • ReDim：重新定义维度

今日代码

vba
Sub 多维数组示例()
    Dim arr(1 To 5, 1 To 3) As String
    arr(1, 1) = "张三"
    MsgBox arr(1, 1)
End Sub

练习题

  1. 创建二维数组存储表格数据
  2. 使用动态数组处理不定量数据
  3. 数组排序算法

参考解答

1. 用arr(1 To n, 1 To m)定义二维数组，将表格数据逐行读取到数组中。 2. 先用Dim arr()声明动态数组，ReDim Preserve动态扩展数组大小处理不定量数据。 3. 实现冒泡排序或快速排序算法，使用临时变量交换数组元素位置。

由在线工具箱(www.vba.net)整理制作