假定在工程文件中有一个标准模块,其中定义了如下记录类型 Type Books Name As String*10 TelNum As String*20 End Type 要求当执行事件过程Command1_C

admin2009-06-20  22

问题 假定在工程文件中有一个标准模块,其中定义了如下记录类型    Type Books        Name As String*10        TelNum As String*20    End Type    要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是:   

选项 A、Ptivate Sub Command1_Click()        Dim B As Books        Open"c:\Person.txt"For Output As#1B.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"c:\Person.txt"For Input As#1B.Name=InputBox("输入姓名")B.TelNum=InputBox("输入电话号码")        Print#1,B.Name,B.TelNum        Close#1      End Sub
C、Private Sub Command1_Click()        Dim B As Books        OPQl"c:\Person.txt"For Output As#1        Nallle=InputBox("输入姓名")        TelNum=InputBox("输入电话号码")        Write#1,B        Close#1      End Sub
D、Private Sub Command1_Click()        Dim B As Books        Open"c:\Person.txt"For lnput As#1        Name=InputBox("输入姓名")        TelNum=InputBox("输入电话号码")        Write#1,B.Name,B.TelNum        Close#1      End Sub

答案A

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

最新回复(0)