请高手帮我解释如下代码的意思
Option Explicit
Const DATASIZE = 459
Dim glngEnrollData(DATASIZE) As Long
Dim gbytEnrollData(DATASIZE * 5) As Byte
问题点数:0、回复次数:6Top
1 楼pcwak()回复于 2005-03-04 19:47:43 得分 0
Option Explicit'强制先声明后使用变量
Const DATASIZE = 459'定义常量
Dim glngEnrollData(DATASIZE) As Long'定义数组
Dim gbytEnrollData(DATASIZE * 5) As ByteTop
2 楼jack518(jacks)回复于 2005-03-04 20:31:11 得分 0
Option Explicit'强制先声明后使用变量
Const DATASIZE = 459'定义常量
Dim glngEnrollData(DATASIZE) As Long'定义数组
是不是指定义glngEnrollData为一维数组,459个元素
Dim gbytEnrollData(DATASIZE * 5) As Byte 再请问这一句呢
Top
3 楼Mister(菜青虫)回复于 2005-03-04 20:55:44 得分 0
Option Explicit'强制先声明后使用变量
Const DATASIZE = 459'定义常量
Dim glngEnrollData(DATASIZE) As Long'定义数组
是不是指定义glngEnrollData为一维数组,459个元素
Dim gbytEnrollData(DATASIZE * 5) As Byte 再请问这一句呢
其实就是 Dim gbytEnrollData(459 * 5) As Byte
也就等于 Dim gbytEnrollData(2295) As Byte
在编译时常量将被替换。Top
4 楼lzvsxz(封ɑ﹏)回复于 2005-03-04 20:57:49 得分 0
dim glngEnrollData(DATASIZE) as Long '一维数组.460个元素.
Dim gbytEnrollData(DATASIZE * 5) As Byte '一维数组.2296个元素.
...................................Top
5 楼AngelDevil()回复于 2005-03-04 21:25:40 得分 0
Option Explicit '强制先声明后使用变量
Const DATASIZE = 459 '定义常量
Dim glngEnrollData(DATASIZE) As Long '定义一维数组(0 - DATASIZE)
Dim gbytEnrollData(DATASIZE * 5) As Byte '定义一维数组(0 - DATASIZE * 5)
Top
6 楼chendjin(蹭分来了)回复于 2005-03-05 09:52:36 得分 0
Option Explicit '强制先声明后使用变量
Option Base 1 '强制声明数组下标的缺省下界为1
如果有上面这句,则
Const DATASIZE = 459 '定义常量
Dim glngEnrollData(DATASIZE) As Long '定义一维数组(1 - DATASIZE), 459个元素
Dim gbytEnrollData(DATASIZE * 5) As Byte '定义一维数组(1 - DATASIZE * 5),2295个元素
Top




