vb程序设计模拟试卷3套(编辑修改稿)

vb程序设计模拟试卷3套(编辑修改稿)内容摘要：

As Single) B． Private Sub Pro3(Arr(3),Option x,Option y) C． Private Sub Pro3(ByRef x,ByVal y,Arr( )) D． Private Sub Pro3(ParamArray Arr( )) 1 个工程，其中的窗体名称为 Form1。 之后又添加了 1个名为 Form2 的窗体，并希望程序执行时先显示 Form2窗体，那么，他需要做的工作是 _______。 A．在工程属性对话框中把“启动对象”设置为 Form2 B． 在 Form1的 Load事件过程中加入语句 Load Form2 C． 在 Form2的 Load事件过程中加入语句 D． 在 Form2的 TabIndex属性设置为１，把 Form1的 TabIndex属性设置为２ Form1的标题栏中显示“ VisualBasic窗体 的语句是 _______。 A． =VisualBasic窗体 B． =VisualBasic窗体 C． =VisualBasic窗体 D． =VisualBasic窗体” 21. 以下能够触发文本框 Change事件的操作是 _______。 A. 文本框失去焦点 B. 文本框获得焦点 C. 设置文本框的焦点 D. 改变文本框的内容 Visual Basic特点的叙述中，错误的是 _______。 A. Visual Basic是采用事件驱动编程机制的语言 B. Visual Basic程序既可以编译运行，也可以解释运行 C. Visual Basic程序不是结构化程序，不具备结构化程序的三种基本结构 D. 构成 Visual Basic程序的多个过程没有固定的执行顺序 23. 设有语句 x=InputBox(“输入数值”，“ 0” ，“示例” )程序运行后， 如果从键盘上输入数值 10并按回车键，则下列叙述中正确的是 _______。 A. 变量 X的值是数值 10 B. 在 InputBox对话框标题栏中显示的是“示例” C. 0是默认值 D. 变量 X的值是字符串“ 10” 24. 以下叙述中，错误的是 _______。 A. 一个 Visual Basic应用程序可以含有多个标准模块文件 B. 一个 Visual Basic工程可以含有多个窗体文件 C. 标准模块文件可以属于某个指定的窗体文件 D. 标准 模块文件的扩展名是 .bas 25. 刚建立一个新的标准 EXE工程后，不在工具箱中出现的控件是 _______。 A. 单选按钮 B. 图片框 C. 通用对话框 D. 文本框 _______。 A. 一个工程可以包含多个窗体文件 B. 在一个窗体文件中定义的通用过程不能被其他窗体调用 C. 窗体和标准模块需要分别保存为不同类型的磁盘文件 D. 用 Dim定义的窗体层变量只能在该窗体中使用 _______。 A． 在一个窗体 文件中定义的通用过程不能被其他窗体调用 B． 一个工程可以包含多个窗体文件 C． 窗体和标准模块需要分别保存为不同类型的磁盘文件 D． 用 Dim定义的窗体层变量只能在该窗体中使用 _______。 A． 打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 B． 保存 Visual Basic程序时，应分别保存窗体文件及工程文件 C． Visual Basic应用程序只能以解释方式执行 D． 事件可以由用户引发，也可以由系统引发 ，不能实现的是： _______。 A． 设计→中断 B. 中断→设计 C. 运行→中断 D. 设计→运行 _______。 A. 执行“视图”菜单中的“属性窗口”命令 B. 按 F4键 C. 按 Ctrl+T D. 单击工具栏上的“属性窗口”按钮 _______。 A. Ctrl+D B. Ctrl+E C. Ctrl+F D. Ctrl+G ，窗体显示的结果为 _______。 Private Sub Command1_Click() Dim a(10) For k = 10 To 1 step 1 a(k) = 11k Next k Print a(a(3)\a(7) mod a(5)) End Sub A. 3 B. 5 C. 7 D. 9 _______。 Dim a(1 To 6) For i=LBound(a, 1) To UBound(a, 1) a(i) =i Next i Print a(LBound(a, 1) )。 a(UBound(a, 1) ) A. 0 0 B. 5 0 C. 1 6 D. 0 6 a(2 to 3,2 to 3)赋值的语句片段为 _______。 A. For i = 0 To 1 For j = 2 To 3 a(i, j) = i * j Next j Next i B. For i = 2 To 3 For j = 2 To 3 a(i, j) = i * j Next j Next i C. For i = 0 To 1 a(i, 2) = i * 2 Next i D. For i = 2 To 3 a(i, 2) = i * 2 Next i Type student number as string name as string age as integer End type 则正确声明该记录类型变量的代码是 _______。 A. type s as student B. dim s as student C. private s as type student D. static s as 二、填空题 ( 每空 2 分，共 30 分） 1．数据结构作为计算机的一门学科，主要研究数据的逻辑结构、对各种数据结构进行的运算，以及______(1) _____。 2．数据库设计的四个阶段是：需求分析、概念设计、逻辑设计和 (2)。 3．软件的 ____(3) _____ 设计又称为总体结构设计，其主要任务是建立软件系统的 总体结构。 4．根据访问根结点的次序，二叉树的遍历可以分为三种：前序遍历、 ___(4) ____遍历和后序遍历。 5．软件是程序、数据和 ____(5) _____的集合。 6．下列程序段的执行结果为 ______(6) __________ A=2 B=5 If A * B 1 Then B=B 1 Else B=1 Print B A 0 7．四个字符串 39。 FORTRAN,BASIC,PASCAL,DBASE比较的结果最小的是 _____(7) ___ 8． A=678 ： B=” 910”： C= A amp。 B： PRINT C,上述语句运行后，窗体上输出的结果是 ___(8) _____ 的事件过程执行结束后， A（ 7）的值是 __ (9) _。 Option explicit Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer Dim i As Integer, k As Integer For i = 1 To 10 a(i) = 1 Next i k = 1 For k = 1 To 10 Step k a(k) = 0 k = k + 2 Next k End Sub 10．在有下面一个程序段从文本框中输入数据，如果该数据满足条件，除以 6 余 2，除以 5 余 3，则输出，否则，将焦点定位在文本框中，并清除文本框的内容。 Private Sub Command1_Click( ) num=Val() If num Mod 6 = 2 And （ 10） Then Print num Else = Text1. （ 11） End If End Sub 11．在窗体上画一个命令按钮（其 NAME 属性为 Command1），然后编写如下代码 : Option Base 1 Private Sub Command1_Click() Dim a s = 0 a = Array(1,2,3,4) j = 1 For i = 4 To 1 Step 1 s = s + a(i) * j j = j * 10 Next i Print s End Sub （ 12）。 12．在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x = 5 If Sgn(x) Then y = Sgn(x ^ 2) Else y = Sgn(x) End If Print y End Sub。