在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下：Sub Command1_Click()Dim student As studtypeDim record_no As Integerrecord_no=1With student.ino=12.strname="smith".strsex="男".smark=89End With_______Put # 1,record_no,studentClose # 1End Sub要求在c: \的随机文件student.d
题目
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下：
Sub Command1_Click()
Dim student As studtype
Dim record_no As Integer
record_no=1
With student
.ino=12
.strname="smith"
.strsex="男"
.smark=89
End With
_______
Put # 1,record_no,student
Close # 1
End Sub
要求在c: \的随机文件student.dat写入一条记录。应在程序中空行处填以下哪条语句使该功能完整
A．Open "c: \student.dat"For Input As #1 len(student)
B．Open "c: \student.dat"For random As #1 len(student)
C．Open "c: \student.dat"For Output As #1 len(student)
D．Open "c: \student.dat"For Append As #1 len(student)
相似考题
更多“在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下:Sub Command1_Click()Dim ”相关问题
-
第1题：
在窗体上添加一个命令按钮，名为Command1，事件过程如下，则执行结果是______。
A．2 4 6 8
B．1 3 5 7
C．3 6 6 12
D．4 8 12 16
正确答案：A
解析：本题的难点是子过程调用和形参与实参结合的对应关系。数组a()先被赋初值，再用子过程名调用子过程，在子过程内数组a()又被重新赋值，通过按值传值将a()的数据带回。 -
第2题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Privme Sub Command1_Click( ) a$="VisualBasic" Print String(3，a＄) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是
A．VVV
B．Vis
C．sic
D．11
正确答案：A
解析：String返回n个字符。如果为字符串，则返回n个字符串的首字符。返回3个"VisualBasic”的首字母“V”。 -
第3题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click（）
a = 12345
Print Format$（a, "000.00"）
End Sub
程序运行后，单击命令按钮，窗体上显示的是（ ）。
A．123.45
B．12345.00
C．12345
D．00123.45
正确答案：B
-
第4题：
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
正确答案：12
12 解析： 本题考查的是VBA编程基础、参数传递。由于VBA中，默认情况下，参数是按地址传递(ByRef)，结果会返回。本题中z的值等于x+y，所以文本框中显示的内容为12。 -
第5题：
在窗体上画一个名为Command1的命令按钮，编写如下程序：
程序运行后，单击命令按钮，输出的结果是_________。
正确答案：
4
【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值，然后通过数组下标嵌套本身。注意：这样的嵌套时，要保证数组下标不出界，否则程序将出错。 -
第6题：
（25）若窗体Frm1中有一个命令按钮Cmd1，则窗体和命令按钮的Click事件过程名分别为
A）Form_Click() Command1_Click()
B）Frm1_Click() Command1_Click()
C）Form_Click() Cmd1_Click()
D) Frm1_Click() Cmd1_Click()
正确答案：C