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

admin2020-08-10  25

问题 在窗体上画一个名称为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#l,,s
        Close#1
    End Sub
    以下叙述中正确的是(        )。

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

答案A

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

最新回复(0)