单项选择题

窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。

设有如下的类型声明
TyPe Person
name AS String8
major AS String20
End TyPe
当单击“保存”按钮时，将两个文本框中的内容写入一个随机文件Test29.dat中。设文本框中的数据已正确地赋值给Person类型的变量P.则能够正确地把数据写入文件的程序段是

A．Open"c：\Test29.dat"For Random As#1

Put#1，1，p

C10se #1
B．OpeH"c：\Test29.dat"For Random As #1

Get#1，1，p

C108C#1
C．Open"c：\Test29.dat"For Random As#1 Len=Len(p)

Put#1，1，p

C108C#1
D．OPell"c：\Test29.dat"For，Random As#1 Len=Len(p)

Get#1，1，p

C106e#1

<上一题目录下一题>

热门试题

单项选择题

下面程序计算并输出的是( )。 Private Sub Command1_Click() Num=10 Sum=0 Do Sum=Sum+Num*Num*Num Num=Num-1 Loop Until Num＜=0 Print Sum End Sub

A) 1³+2³+3³+10³的值
B) 10!+…+3!+2!+1!的值
C) (1+2+3+…+10)³的值
D) 10个10³的和

单项选择题

设有如下程序： Private Sub Form_Click() Cls a$= 123456 For i=1 To 6 Print Tab(12-i);______ Next i End Sub 程序运行后，单击窗体，要求结果如图所示，则应填入的内容为( )。

A) Left(a$, i)
B) Mid(a$, 8-i, i)
C) Right(a$, i)
D) Mid(a$, 7, i)