[单选题]

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

A.Ptivate Sub Commandl Click() Dim B As Books Open"C:/Person.txt"For Output AS#1 BName=InputBox("输入姓名") BTelNum=InputBox("输入电话号码") Write#1,BName,BTeLNum Clodr#1 End Sub

B.Ptivate Sub Commandl_C1iok() Dim B As Books Opcn"c:/Person.txt"For Input As#1 BName=InputBox("输入姓名") BTelNum=InpuBox("输入电话号码") Print#1,BName,@B@TelNum C1ose#1 End Sub

C.Private Sub Commandl Click() Dim B As Books Open"c:/Person.txt"For Output As #1 BName=InputBox("输入姓名") BTelNum=InputBox("输入电话号码") Write#1、B Close#1 End Sub

D.Private Sub Command1 C1ick() Dim B As Books Open"c:/Person.txt"For Input As #1 Name=InputBox('输入姓名') TelNum=InputBox("输入电话号码") Print#1,Name,TelNum Close#1 End Sub

参考答案与解析:

相关试题

设在工程中有一个标准模块,其中定义了如下记录类型:Type BooksName

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

  • 查看答案
  • 设在工程中有一个标准模块,其中定义了如下记录类型:Type BooksName

    [单选题]设在工程中有一个标准模块,其中定义了如下记录类型: Type Books Name As String * 10 TelNum As String * 20 EndType 在窗体中添加一个名为Commandl的命令按钮,要求单击命令按钮时,在顺序文件 Ptxt中写入一条记录。下列能够完成该操作的程序段是 ( )A.Private Sub Commandl_Click() Dim B As Books Open"d:/P1.txt"For Output As #1 B. Name=Input

  • 查看答案
  • 设在工程中有一个标准模块,其中定义了如下记录类型Type BooksName

    [单选题]设在工程中有一个标准模块,其中定义了如下记录类型 Type Books Name As String*10 TelNum As String*20 End Type 在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1_Click时, 在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是______。A.Private Sub Command1_Click() Dim B As Books Open "c:/Person.txt" For

  • 查看答案
  • 设在工程中有一个标准模块,其中定义了如下记录类型Type BooksName

    [单选题]设在工程中有一个标准模块,其中定义了如下记录类型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 O

  • 查看答案
  • 设在工程中有一个标准模块,其中定义了如下记录类型:Type Books Name

    [单选题]设在工程中有一个标准模块,其中定义了如下记录类型:Type Books Name As String *10 Te1Num As String *20End Type 在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是。A.Private Sub Command1_Click() Dim B As Books Open"c":/Person.txt"For Output

  • 查看答案
  • 设在工程中有一个标准模块,其中定义了如下记录类型:Type Books Name

    [单选题]设在工程中有一个标准模块,其中定义了如下记录类型:Type Books Name As String ( 10 Te1Num As String * 20End Type在窗体上添加一个名为Command1的命名按钮。要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。请在横线中填入适当的内容,将程序补充完整。Private Sub Command1_Click() Dim B As____ Open "c:/person.txt"For Outp

  • 查看答案
  • 设在工程中有一个标准模块,其中定义了如下记录类型Type Books Name

    [单选题]设在工程中有一个标准模块,其中定义了如下记录类型 Type Books Name As String*10 TelNum As String*20 End Type 在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1_Click时, 在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是 ______。A.Private Sub Command1_Click() Dim B As Books Open "c:/Person.txt"For

  • 查看答案
  • 设在工程中有一个标准模块,其中定义了如下记录类型: TyPe Record ID

    [单选题]设在工程中有一个标准模块,其中定义了如下记录类型: TyPe Record ID A3 Integer Name As String*20 End TyPe 在窗体中添加一个名为Command1的命令按钮,假设d:/F1.dat文件中含有5个用户自定义类型的记录。要求当执行事件过程Command1_Click时,随机访问该文件,并把文件中的第4条记录读出。下列能够完成该操作的程序段是A.Private Sub Command1_Click( ) Dim MyRecord As Record,Po

  • 查看答案
  • ( 35 )设在工程文件中有一个标准模块,其中定义了如下记录类型:Type Bo

    [单选题]( 35 )设在工程文件中有一个标准模块,其中定义了如下记录类型:Type BooksName As String * 10TelNum As String * 20E.nd Type在窗体上画一个名为 Command1 的命令按钮,要求当执行事件过程 Command1_Click 时,在顺序文件Person.txt 中写入一条 Books 类型的记录。下列能够完成该操作的事件过程是A. ) Private Sub Command1_Click()D.im B As BooksOpen “ Pe

  • 查看答案
  • 设在工程中有一个标准模块,其中定义了如下类型:Type stutypeino

    [单选题]设在工程中有一个标准模块,其中定义了如下类型: Type stutype ino As Integer strname As String*20 strsex As String*1 smark As Single End Type 在窗体上画一个名为Connnand1的命令按钮,要求当执行事件过程Command1_Click时,在c:/的随机文件student..dat写入一条记录。下列能够完成该操作的事件过程是( )。A.Sub Command1_C1ick() Dim student As

  • 查看答案
  • 设在工程中有一个标准模块,其中定义了如下记录类型______。Type Book