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

admin2010-09-11  33

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

选项 A、Private Sub Command1_Click()    Dim B As Books    Open "c:\Person.txt" For Output As #1        B.Name=InpuBox(“输入姓名”)        B.TelNum=InputBox(“输入电话号码”)        Write #1,B.Name,B.TelNum    Close #1End Sub
B、Private Sub Command1_ Click()    Dim B As Books    Open "c:\Person.txt" For Input As #1        B.Name=InputBox(“输入姓名”)        B.teLNum=InputBox(“输入电话号码”)        Ptint #1,B.Name,B.TelNum    Close #1End Sub
C、Private Sub Command1_ Click()    Dim B As Books    Open "c:\Person.txt" For Output As #1        B.Name=InputBox(“输入姓名”)        B.TelNum=InputBox(“输入电话号码”)        Write #1,B    Close #1End Sub
D、Private Sub Command1_ Click()     Dim B As Books     Open "c:\Person.txT" For Input As #1        Name=InputBox(“输入姓名”)        TelNum=InputBox(“输入电话号码”)        Print #1 Name. TelNum    Close #1End Sub

答案A

解析 A选项正确。
B选项向文件中输出内容,打开方式应当为For output。
C选项记录变量不可以对元素整体输入输出。
D选项记录变量的输入和输出都必须指明到记录元素。格式为:记录变量.元素名。
转载请注明原文地址:https://jikaoti.com/ti/SBg0FFFM
0

最新回复(0)