VBA编程中怎样设置一个数组？

首先打开excle软件。

进入VBA的编程界面，新建一个子过程bianliang

在子过程中定义一个变量，这个变量是一个数组，类型是字符串类型，由3个元素。

Dim city(3) As String

为这个数组的3个元素各自赋值

city(1) = "meizhou"

    city(2) = "shanghai"

    city(3) = "guangzhou"

将这个数组的3个元素的值打印出来。

MsgBox "第一个城市是" & city(1) & "第二个城市是" & city(2) & "第三个城市是" & city(3)

完整代码如下：

Sub bianliang()

    Dim city(3) As String

    city(1) = "meizhou"

    city(2) = "shanghai"

    city(3) = "guangzhou"

    MsgBox "第一个城市是" & city(1) & "第二个城市是" & city(2) & "第三个城市是" & city(3)

End Sub

选择顶部菜单的“运行”按钮。

回到excle的界面，这时候就可以看到数组的3个元素的值了。