A.Open"c:/student.dat"For Input As # 1 len=len(student)
B.Open"c:/student.dat:For random As # 1 len=len(student)
C.Open"c:/student.dat"For Output As # 1 len=len(student)
D.Open"c:/student.dat"For Append As # 1 len=len(student)
[单选题]在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下:Sub Command1_Click()D.im student As studtypeD.im record_no As Integerrecord_no=1With student.ino=12.strname="smith".strsex="男".smark=89E.nd With_______Put # 1,record_no,studentC.lose # 1E.nd Sub要求在c: /
[单选题]在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下:要求在C:的随机文件student.dat写入一条记录。应在
[单选题]在窗体上画一个名称为Command1的命令按钮,单击命令按钮时执行如下事件过程:Private Sub Command1_Click( )a$="so
[单选题]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )。程序运行时,单击C
[单选题]在窗体上画一个命令按钮(名称为Command1),编写如下事件过程: Private Sub Command1_Click() b=5 c=6 Print a=b+c End Sub 程序运行后,单击命令按钮,输出的结果是: ______。A.a=11B.a=b+cC.a=D.假
[单选题](23)在窗体上画一个名为 Command1 的命令按钮,然后编写以下程序:Private Sub Command1_Click( )D.im M(10) As IntegerF.or k=1 To 10M(k)=12-kNext kx=8Print M(2+M(x))E.nd Sub运行程序,单击命令按钮,在窗体上显示的是( )。A.)6B.)5C.)7D.)8
[试题](11)在窗体上画一个名为 Command1 的命令按钮,然后编写如下程序:Private Sub Command1_Click( )D.im i As IntegerSum=0n=InputBox("Enter a number")n=Val(n)F.or i=1 To nSum= (12)Next iPrint SumE.nd SubF.unction fun(t As Integer)As Longp=1F.or i=1 To tp=p*iNext i(13)E.nd Function以
[单选题]在窗体上画一个名为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim Arr Arr = Array(1,2,3,4,5) j=1 For i = 5 To 1 Step -1 S = S + Art(i) * j j =j * 10 Next Print S End Sub 程序运行后,单击命令按钮,输出结果为( )。A.54321B.123C.12345D.345
[单选题]在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程: Private Sub Command1_Click() a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBox a$,,b$,c$,1 End Sub 则在弹出的信息框的标题栏中显示的信息是( )。A.hardwareB.softwareC.hardwareD.1
[单选题]在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程: Private Sub Command1_Click( ) a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBox aS,b$,c$,1 End Sub 则在弹出的信息框的标题栏中显示的信息是A.software and hardwareB.softwareC.hardwareD.1