求大家帮忙，这个程序里面的函数是什么意思。
FILENO = FreeFile
FILENM = user.FILENAME.CurrentValue
L = 0
'***************************************************************
'Open file
'***************************************************************
Open FILENM For Random As FILENO Len = Len(Hourlyrptrec(0)).. “.请问Hourlyrptrec(0）中括号里面的参数是什么意思。Hourlyrptrec是一个数组。”
CURPOS = LOF(FILENO) / Len(Hourlyrptrec(0))
For I = 0 To CURPOS
ReDim Preserve Hourlyrptrec(I) “.请问Hourlyrptrec(i）中括号里面的参数是什么意思。Hourlyrptrec是一个数组。”
Get FILENO, I + 1, Hourlyrptrec(I)
Next
Close FILENO
[解决办法]
Hourlyrptrec(i）表示Hourlyrptrec数组的第i个值。
[解决办法]
'打开记录文件，另每一记录的长度等于预先定义的数组元素的大小（记录长度已知）
Open FILENM For Random As FILENO Len = Len(Hourlyrptrec(0))
'计算文件中的记录数
CURPOS = LOF(FILENO) / Len(Hourlyrptrec(0))
'重新定义数组大小。注意，在这里一次定义好，不要在循环中反复改变
ReDim Preserve Hourlyrptrec(CURPOS - 1)
For I = 0 To CURPOS - 1
Get FILENO, I + 1, Hourlyrptrec(I)
Next I
Close FILENO
