2010级_V期末试卷(A卷带答案 2011.6).docVIP

天津工业大学201 0 ～201 1 学年第 2 学期 高级语言程序设计（VB） 试卷（A卷） 班级 学号 姓名 注意事项：1、本试卷共 页，满分为 分，考试时间为 分钟。 2、标准答题卡使用2B铅笔涂写；文字题答题时请使用蓝、黑钢笔或圆珠笔，不得使用红颜色墨水笔。 题 目 一 二 三 总 分 分数核对 得 分 阅卷人 一、单项题（每1分，共 0分） （请将答案按照题干上【】内的序号涂写“标准答题卡”） 【1】 。 A) 工程文件 B) 窗体文件 C) 类模块文件 D) 标准模块文件 2．在VB 6.0集成开发环境的设计模式下，用鼠标双击窗体上的某个对象后，打开的窗口是 【2】 。 A) 代码窗口 B) 窗体设计窗口 C) 属性窗口 D) 工程资源管理器窗口 3．设有变量定义语句Dim a%，则变量a的数据类型是 【】 。 双精度类型字符串类型ABabc B) ABC = UCase(abc) C) ABCDabc D) Mid(ABCD,3,1)=Left(ABCD,3) 5．函数InStr(ABCDEF, CD)的值是 【】 。 A) 2 B) 3 C) True D) CDEF 6．下列程序运行后，单击窗体，输出结果是 【6】 。 Private Sub _Click() Dim a As Integer, b As Integer a = 3 b = 5 Print a + b; a b End Sub A) 8 8 B) 35 35 C) 8 35 D) 35 8 7．下列程序运行后，单击窗体，输出结果是 【7】 。Private Sub Form_Click() a = 3: b = 7 a = a + b : b = a – b : a = a - b Print a; b End Sub A) 4 3 B) 7 3 C) 3 7 D) 10 7 8．下面程序段所表示的数学关系式是 【8】 。 If (a b) Then If d = c Then x = 1 Else x = 2 End If A) B) C) D) 9．下程序运行后，单击窗体，输出结果是 。Private Sub Form_Click() s = 0: k = 1 Do s = s + k: k = k + 1 Loop Until k = 5 Print s End Sub A) 15 B) 10 C) 1 D) 0 10．下列程序段的输出结果是 【10】 。 For k = 4 To 2 Step -2 m = k Next k Print m; k; A) 2 2 B) 2 0 C) 2 1 D) 0 0 11．用下面的语句定义数组，则数组中的元素个数是 【11】 个。 Option Base 1 Dim A(-1 To 2，5) As Integer A) 5 B) 10 C) 15 D) 20 12．下面程序段的输出结果是 【12】 。 Dim a(4) As Integer, s As Integer For k = 1 To 4 a(k) = 2 * k Next k For k = 1 To 4 Step 2 s = s + a(k) Print s; Next k A) 8 B) 20 C) 2 8 D) 2 6 12 20 13．设有如下的用户自定义类型 Private Type Stu name As String * 10 age As Integer End Type 则以下正确引用该类型成员的代码是 【13】 。 A) Stu.name=zhang B) Dim s As Stu s.name = zhang C) Dim s As Type Stu s.name = zhang D) Dim s As Type s.name = zhang 14．用“ 【14】 ”关键字声明的变量称为全局变量。 A) Private B) Public C) Dim D) Static 15．在窗体上放置一个文本框，程序运行后，在文本框中输入abc，但显示的却是***，可能的原因是该文本框的 【15】 属性值已经被设置