在窗体上画一个名称为Command1的命令按钮,编写如下程序代码 Private Type Student sn As String*10 class As String*20 score As Double End Type Private Sub Co

admin2018-06-20  30

问题 在窗体上画一个名称为Command1的命令按钮,编写如下程序代码
Private Type Student
sn As String*10
class As String*20
score As Double
End Type
Private Sub Command1_Click()
Dim s As Student
Dim s1 As Student
Open"C:\Scorelist.dat"For Random As #1 Len=Len(s)
s.sn="张一帆"
s.class="计2014—1班"
s.score=90
Put #1,,s
Close #1
End Sub
以下叙述中正确的是(    )。

选项 A、若文件C:\Seorelist.dat已存在并且有记录,单击命令按钮,可以修改文件中的一条记录
B、若文件C:\Scorelist.dat不存在,则Open语句执行中出现“文件未找到”的错误
C、文件C:\Scorelist.dat中的每条记录长度可以不同,但记录最长为Len(s)
D、定义记录类型Student的Type语句可以移到事件过程Commandl_Click中

答案A

解析 在Open语句中指定文件的访问方式为输出(Output)、附加(Append)或随机(Random),若打开的文件不存在,则建立相应的文件。本题中指定的访问方式为Random,所以B选项叙述错误;对于用随机访问方式打开的文件,其每个记录的长度必须是相同的,C选项叙述错误;记录类型的定义必须放在模块(包括标准模块和窗体模块)的声明部分,D选项叙述错误,本题A选项叙述正确。本题选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/MiGp777K
0

最新回复(0)