Question

Private A(n) As Integer和Dim A() As Integer声明什么？

Answer 1

Private A(n) As Integer 声明一维整型数组A，元素个数n+1个，默认下标从0开始 Private定义的模块级别的私有整型数组A
Dim A() As Integer 声明一维整型数组A，元素个数需要在后期使用Redim A(m)来定义 模块级别或过程级别都可以定义

追问

那个是声明一个一维动态数组的啊？麻烦告诉一下。谢谢？

追答

如果要定义动态数组的话
dim A() as integer
重定义A的元素个数
ReDim A(2) 原有数组A中的值被清空，数组的元素个数变成3个，类似 A（0 to 2 ）
ReDim Preserve A(2) 原有数组A中前三个值被保留

Private A(n) As Integer 这样定义的话是编译不通过的！必须定义常量n；const n=10

Answer 2

Private A(n) As Integer只能放在函数的外面,它是这个界面,模块或类里的一个成员.就像Java中类的私有成员,从定义开始就定死了,不能再对它进行改变.
Dim A() As Integer可以放在任何地方,没有规定大小,在使用它时必须使用redim来为它定大小.
Dim A() As Integer是面向过程类型的写法
Private A(n) As Integer是面向对象类型的写法.
VB是面向过程半面向对象的语言.所以出现了这种混合体

Answer 3

Dim A() As Integer
声明一个整型数组
Private A(n) As Integer
声明一个私有变量

追问

那个是声明一个一维动态数组的啊？麻烦告诉一下。谢谢？

追答

Dim s() As Integer ‘声明一个一维动态数组
Redim s(n) '按照变量n的值动态改变此数组大小。原来s中如果有数据就会被丢失
Redim Preserve s(n) '这样改变大小时会保留原来的数据