UC知道LOF(1)/LEN(student)是什么意思?
来源：百度知道 编辑：UC知道 时间：2024/05/24 14:12:11
在VB随机访问模式中经常会出现如Type stutype
iNo As Integer
strName As String * 20
sMark As Single
End Type
Dim Student As stutype
Dim Record_No As Integer
Private Sub Form_Load()
Open "c:\STUDENT.DAT" For Random As #1 Len = Len(Student)
Record_No = LOF(1) / Len(Student)
Label6.Caption = Record_No
HScroll1.Max = Record_No - 1
HScroll1.Value = 0
End Sub
其中LOF(1)/LEN(student)是什么意思?
iNo As Integer
strName As String * 20
sMark As Single
End Type
Dim Student As stutype
Dim Record_No As Integer
Private Sub Form_Load()
Open "c:\STUDENT.DAT" For Random As #1 Len = Len(Student)
Record_No = LOF(1) / Len(Student)
Label6.Caption = Record_No
HScroll1.Max = Record_No - 1
HScroll1.Value = 0
End Sub
其中LOF(1)/LEN(student)是什么意思?
LOF(1)--文件总长度，即c:\STUDENT.DAT的长度。
Len(Student) --一条学生记录的长度。即自定义类型stutype的长度。
LOF(1)/LEN(student)表示文件中共保存了多少条学生的记录。即记录数。