设在工程文件中有一个标准模块,其中定义了如下记录类型: Type Books NameAs String*10:TeINumAs String*20 End Type 在窗体上画一个名为Commandl的命令按钮,要求当执行

admin2018-10-15  17

问题 设在工程文件中有一个标准模块,其中定义了如下记录类型:
    Type Books
    NameAs String*10:TeINumAs String*20
    End Type
    在窗体上画一个名为Commandl的命令按钮,要求当执行事件过程Commandl Click时,在顺序文件Person.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是

选项 A、Private Sub Commandl_Click()
    Dim B As Books
    Open”Person.txt”For OuWut As#1
    B.Name=InputBox(”输入姓名”)
    B.TelNum=InputBox(”输入电话号码”)
    Write#1,B.Name,B.TelNum
    Close#1
    End Sub
B、Private Sub Command1_Click()
    Dim B As Books
    Open”Person.txt”For Input As #1
    B.Name=InputBox("输入姓名”)
    B.TelNum=InputBox(”输入电话号码”)
    Print #1,B.Name,B.TelNum
    Close#1
    End Sub
C、Private Sub Command1_Click()
    Dim B As Books
    Open”Person.txt”For OUtput As #1
    B.Name=InputBox(”输入姓名”)
    B.TelNum=InputBox(”输入电话号码”)
    Write#1.B Close#1
  End Sub
D、Private Sub Commandl_Click()
    Open”Person.txt”For Input As#1
    Name=InputBox(”输入姓名”)
    TelNum=InputBox(”输入电话号码”)
    Print#1,Name,TelNum
    Close#1
  End Sub

答案A

解析 本题考查的考点是有关文件的。打开顺序文件的基本格式为:Open FileName For Mode As#FileNumber其中,FileName表示要打开的文件的路径;Mode为文件打开模式:OutPut用于输出、Append用于追加写入、Inpul用于读取;FileNumber为打开文件时指定的句柄(文件号)。本题中由于需要写入到文件中,所以Mode应该为Output;写入文件时如果写入的是一个自定义类型的变量,则需要把这个变量的每个成员分别写入到文件中,而不能一次性写入整个变量。
转载请注明原文地址:https://kaotiyun.com/show/NTFp777K
0

最新回复(0)