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

admin2012-12-08  41

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

选项 A、Private Sub Commandl Click()
    Dint B AS B00kS
    B.Name=InputBox(“输入姓名”)
    B.TelNum=InputBox(”输入电话号码”)
    Write#1,B.Name,B.TelNurn
    Close#1
  End Sub
B、Private Sub Commandl Click()
    Dim B AS Books
    Open“C:\Person.txt”For Input As#1
    B.Name=InputBox(“输入姓名”)
    B.TelNum=InputBox(“输入电话号码”)
    Print#1,B.Name,B.TelNLlm
    Close#1
  End Sub
C、Private Sub Commandl Click()
    Dim B As Books
    Open“c:\Person.txt”For Output As#l
    Name=InputBox(”输入姓名”)
    TelNom=InputBox(”输入电话号码”)
    Write#1,B
    Close#1
  End Sn1h
D、Private Sub Commandl Click()
    Dim B AS Book
    Open“c:\Person.txt”For Input As#1
    Name=InputBox(“输入姓名”)
    TelNum-InputBox(“输入电话号码”)
    Print#1,B.Name.B.TelNHm
    Close#1
    End Sub

答案A

解析
转载请注明原文地址:https://jikaoti.com/ti/rdO0FFFM
0

最新回复(0)