学年第学期vb考试题及标准答案.doc

西北农林科技大学本科课程考试试卷 2006—2007年第2学期《程序设计基础（VB）》课程A卷 题目 一 二 三 四 总分 得分 阅卷人 一、单项选择题（每题2分，共30分，从四个选项中选出最佳答案填在括号内） 1． 要对文本框中输入每一个字符进行检验，最好使用文本框的（ ）事件。 A、Click B、Change C、LostFocus D、KeyPress 2． 在窗体上添加一个框架（Frame1），再在框架（Frame1）内添加三个标签对象和三个文本框对象，在该应用程序共涉及到（ ）个对象。 A、7 B、8 C、6 D、2 3． 在VB中，不能正确产生“A~J”范围内某个字符的表达式是（ ）。 A、Chr(Int(Rnd*10+65)) B、Choose(Int(Rnd*10+1),A,B,C,D,E,F,G,H,I,J) C、Mid(ABCDEFGHJI,INT(Rnd*10)+1,1) D、Str(Int(Rnd*10+65)) 4． 用“For i=1 To 15 Step 2”语句控制的循环，循环体执行（ ）次。 A、6 B、8 C、7 D、不定 5． 下面标识符中，（ ）可以作为VB中合法的变量名。 A、2a B、stu C、A b D、X^2 6． 下面关于控件数组说法错误的是（ ）。 A、控件数组中所有元素，共用同一组事件过程 B、控件数组中通过Index属性来区分每个元素 C、控件数组通过数组名只表示一个控件对象 D、一个控件数组中不能包括不同类型的控件 7． 通过自定义数据类型 Private Type student Xh As String * 8 Xm As String * 8 Yy As Integer Gs As Integer Sf As Boolean End Type Dim a As student 定义的变量a所占字节数是（ ）字节。 A、 21 B、22 C、37 D、38 8． 用Array函数给数组a赋值时，下列（ ）是正确的。 A、Dim a$() B、Dim a() a=Array(A,B,C,D,E) a=Array(A,B,C,D,E) C、Dim a(1 to 5) D、Dim a$(4) a=Array(A,B,C,D,E) a=Array(A,B,C,D,E) 9．有如下程序 Sub swap(x%, y%) Dim t%, x%, y% t = x: x = y: y = t End Sub Private Sub Form_Click() Dim a%, b% a = 10: b = 8 Call swap(a, b) Print a, b End Sub 单击窗体后，程序运行结果为（ ）。 A、8 10 B、10 8 C、a=8 b=10 D、编译错误对话框 10. 通过Open student.txt For Output As #1语句打开的文件，Output表示对文件进行的操作是（ ）。 A. 读 B. 写 C. 读/写 D. 创建一个新文件 11．在窗体上画一个命令按，然后编写如下代码： Private Sub Command1_Click() dim a as String ,b as String a=Inputbox(请输入第一个数) b=Inputbox(请输入第二个数) print a+b End Sub 程序运行后，单击命令按钮，在两个对话框中先后输入12345和54321，程序的输出结果是（ ） A、66666 B、5432112345 C、1234554321 D、出错 12．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer, s As Integer a = 8 : s = 1 Do While a = 0 s = s + a a = a - 1 Loop Print s; a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（ ） A、1 8 B、37