题目内容

设在工程中有一个标准模块，其中定义了如下记录类型： 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=InputBox("姓名") B. TelNum=InputBox("电话号码") Write #1,B. Name,B. TelNum Close #1 EndSub
B. Private Sub Commandl_Click() Dim B As Books Open" d:\Pl.txt" For Input As B. Name=InputBox ("姓名") B. TelNum=InputBox ("电话号码") Print #1,B. Name,B. TelNum Close #1 EndSub
C. Private Sub Commandl_Click() Dim B As Books Open"d:\P1. txt"For Output As B. Name=InputBox("姓名") B. TelNum=InputBox ("电话号码") Write #1,B Close #1 EndSub
D. Private Sub Commandl Cliek() Open"d:\P1.txt" For Input As Name=InputBox("姓名") TelNum=InputBox ("电话号码") Print #1,Name,TelNum Close #1 EndSub

查看答案

搜索结果不匹配？点我反馈

更多问题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Commandl_Cliek() Dim arrayl(10, 10)As Integer Dim i,j As Integer For i＝1 To 3 Forj=2 To 4 array1(i, j)=i+j Next j Next i TextText=array1(2, 3)+array1(3, 4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是 ()

A. 12
B. 13
C. 14
D. 15

在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和 Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下两个事件过程： Private Sub Commandl Click() a=TextText+TextText Print a End Sub Private Sub Form. Load() TextText="" Text2．Text="" End Sub 程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和 321，然后单击命令按钮，则输出结果为 ()

A. 444
B. 321123
C. 123321
D. 132231

Jill: Hi, Jane, this is Jill. Do you have time to talk？ Jane: Hi, Jill, ______. I was just

A. so what
B. no doubt
C. some time
D. sure

Bob: Why didn't you come to my party last night？ Bill: I'm sorry, ______ I had to visit my

A. I did it
B. I still remember it
C. I couldn't make it
D. I will come