模块文件中的全局数组

Question

我有问题

file 1:
 Module1 - file name

在这个文件中，我需要声明全局数组，比如

Dim array1(100) As Integer

在另一个文件中，这是UserForm - 我需要更改此数组的值

Module1.array1(2) = 1995 //for example

我该怎么做？

我遇到编译错误：维数错误

Answer 1

当您想要定义全局变量或公共变量时，您需要（a）在函数/子定义之外定义它，以及（b）使用全局变量或公共变量。

所以在你的模块中：

Public array1(100) As Integer

以你的形式：

array1(0) = 1995