九江学院期末考试复习题（政法A1111）第一套
一、判断题
1、Visual Basic?序开发的特点是面向对象的事件驱动。（J
2、Print_Text 是一个不合法的变量名。（为
3、窗体的AutoRedraw属性实现了屏幕图像的重建。（翌
4、设置字体大小应使用Font属性（为
5、Sub过程可以实现嵌套调用（寸
6、IIF函数中的三个参数都不能省略。（寸
7、块结构条件语句以End If结束，而单行结构条件语句没有End旧（明
8、当终值小于初值时，步长为负数。（5
9、执行While-Wend循环时，如果一开始条件就不成立，则语句块一次也不会执行。（寸
10、关于数组的引用，在程序中，凡是简单变量可以出现的地方都可以出现数组元素的引用（/）
二、单项选择题
1. Print Format （123, ” ###说执行之后的结果为
A）# 123B） 123C） 123# D） # # # #
【答案】B
2. 下面可以表示注释语句开头的为
A）R e B R C Rem。dim
【答案】C
3. 下列选项中窗体载入事件为
A) Load 事件B) Click事件C) DblClick事件D) Unload 事件
【答案】A
4. Timer控件可以使用下列哪种事件
A) Click事件B) Timer 事件C) Dblclick 事件D) Change事件
【答案】B
5. 在InputBox函数中哪一个参数是必须的
A) Prompt B) Buttons C) Title D) Context
【答案】A
6. 以下叙述中错误的是：
A)如果过程被定义为Static类型，则该过程中的局部变量都是Static类型
B) Sub过程中不能嵌套定义Sub过程
C) Sub过程可以嵌套调用Sub过程
D) 事件过程可以像通用过程一样由用户定义过程名
【答案】C
乙要填加一个标准模块，可使用“ 单中的添加模块”命令。
A)文件B)视图C)工程D)工具
【答案】C
8 .在块结构条件语句If-Then / Endif中
(A) 必须至少有一个Elseif语句
(B )可以有任意多个ElseIf-Then语句
(C)如果没有Else语句，运行时将出现错误
(D )给定的条件只能是关系表达式或逻辑表达式
【答案】B
9.以下Case 语句中错误的是 (A) Case 10 To 1 (B) Case Is>10 (C) Case Is>10 , Is<50
(D) Case 3,5,Is>10
11 .语句Dim arr(-3 To 5, 2 To 6) As Intege 定义的数组元素有
______ 个
A) 45 B) 40 C) 11 D) 54
【答案】A
12. 下列关于Option Base 语句说法错误的是 D
A) Option Base 语句只能出现在窗体层或模块层
B) Option Base 语句不能出现在过程中
C) Option Base 语句必须位于数组的定义之前
D) Option Base 语句只对一维数组有效
【答案】D
10 .对 正确的是()。
A. 如果循环条件为常数 0, 则一次循环也不执行
B. 如果循环条件为常数 0, 则至少执行一次循环
C. 如果循环条件是不为 0的常数，则至少执行一次循环
D. 无论循环条件是否为 "True",则至少执行一次循环
13、Visual Basics特点不包括下面的(A)
A不需编程B面向豆象的程序设计
C可视化程序设计D时间驱动的程序设计
14、从键盘上能够输入两个字符串，分别保存在变量strl、str2中。确定第二个字符串在第一个字符串中起始位置的函数是(D)
A Left
B Mid
C String
D Instr
15、如果将布尔常量值True赋值给一个整型变量，则整型变量的值为
(B) A 0B -1
C True
D false
16、下列符号常量的声明中，(C)是不合法的。
A Const a As Single = 1.1
B Const a As Integer = "12”
C Const a As Doi Const a = ” OkC
17、四个字符“E”，“y”，的“ASGIIB8t最大的是(B)
A "E”
B "y”
C "B”
D “8”
18、将变量k四舍五入保留2位小数的表达式是(C)
A Int((k+0.5)*100)/100
B Int((k*100)/100)+0.5
C Int(k*100+0.5)/100
D Int(k*(100+0.5))/100 ”
19、30.将数学表达式Cos2(a+b)+5e西成Visual Basic的表达式，其正确的形式是(A)
A) Cos(a+b)A2+5*exp (2)B) Cos八2(a+b)+5*exp(2)
C) Cos(a+b)A2+5*ln (2)D) CosA2(a+b)+5*ln(2)
20、在顺序文件中，当使用Write#语句时，文件打开的方式必须是(B) A
Output 和Input B Output 和Append
C Output
D Append
三、程序分析题
1. 以下语句的输出结果是(注：■表示一个空格)
a = 123
b = 456
Print a; b
A) 123?456B) ■ 123! 456C) ■ 123! 456! D) ■ 123! ■ 456
【答案】D
2. 下列程序执行的结果为
x = -6 A 2
Print Sgn(x) + Abs(x) + Int(x)
A) — 36B) 1C) - 1D) —72
【答案】C
3. 在窗体上画一个名称为Command 1的命令按钮，一个名称为Label1的标签，然后编写如下的事件过程：
Private Sub Command1_Click()
s = 0
For i = 0 To 15
X = 2 * i - 1
If X Mod 3 = 0 Then s = s + 1
Next i
Label1.Caption = s
End Sub
程序运行后，单击命令按钮，则标签中显示的内容为
A) 1B) 5C) 27D) 45
【答案】B
4. 在窗体上画一个名称为Command 1的命令按钮，一个名称为Label* Label2、Label3的标签，然后编写如下的事件过程：
Private x As Integer
Private Sub Command1_Click()
Static y As Integer
Dim z As Integer
n = 10
z = n + z
y = y + z
x = x + z
Label1.Caption = x
Label2.Caption = y
Label3.Caption = z
End Sub
运行程序后，连续三次单击命令按钮后，则三个标签中显示的内容分别是
A) 101010B) 303030Q 303010D) 1030
【答案】C
5. 在窗体上画一个名称为Command 1的命令按钮，一个名称为Label* Label2的标签，然后编写如下的事件过程：
Private x As Integer
Private Sub Command1_Click()
x = 5: y = 3
Call Proc(x, y)
Label1.Caption = x
Label2.Caption = y
End Sub
Private Sub Proc(ByVal a As Integer, ByVal b As Integer)
x = a * a
y = b + b
End Sub
运行程序后，则两个标签中显示的内容分别是
A) 5 和3B) 25 和3Q 25 和6D) 5 和6
【答案】B
6. 下面程序段求两个数中的大数，不正确的是
(A) If x> y Then Max=x Else Max=y
(B) Max=IIf(x>y,x,y)
(C) If y > =x Then Max=y
Max=x
(D) If y> x Then Max=y
Max=x
二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。 A、Caption B、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。 A、Caption B、Name C、Text D、Value
7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的 D 。 A、在标题项中输入&，然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 A 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 D 。 12、以下选项中，不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后，Visual Basic将显示的窗口是 A 。 A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 15、设有如下语句： Strl＝InputBox（"输人"，""，"练习"） 从键盘上输人字符“示例”后，Strl的值是 D 。 A．“输入” B．“” C．“练习” D．“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_Click C. Frm1_Click D. Me_Click 17、窗体的hide属性的含义是 A 。 A.隐藏 B.展现 C.装入 D.卸载 18、若要设置定时器控件的定时时间，需设置的属性是 C 。 A．Enabled B．Value C．Interval D．Text 19、能够改变复选框中背景颜色的属性是 C 。
第1题（1.0分）题号:227 表达式1 and 0的值【1】.答案：1). False 第2题（1.0分）题号:222 把整数0赋给一个逻辑型变量,则逻辑变量的值为【1】. 答案：1). False 第3题（1.0分）题号:60 a 和b 中有仅只有一个为1,相应的Visual Basic逻辑表达式为【1】. 答案：1). a=1 xor b=1 第5题（1.0分）题号:244 设x为一个两位数,将x个位数和十位数交换后所得两位数VB的表达式是【1】. 答案：1). (x mod 10) * 10 + int(x/10) 第7题（1.0分）题号:226 表达式32\7 MOD 3^2 的值是【1】. 答案：1). 4 第8题（1.0分）题号:288 文件按照存取方式及其组成结构可以分为顺序文件和【1】. 答案1). 随机文件或随机 第9题（1.0分）题号:319 Option Base 1的作用是确定数组的下界为【1】. 答案：1). 1 第1题（1.0分）题号:236 所有的VB 的变量,都有隐含说明字符和强调声明两种方法来定义. 答案：N 第2题（1.0分）题号:246 ActiveX控件是扩展名为*.ocx的独立文件,使用时需用 "工程"/"部件"载入或移去. 答案：Y 第3题（1.0分）题号:289 框架控件和形状控件都不能响应用户的鼠标的单击事件. 答案：Y 第4题（1.0分）题号:350 在窗体模块的声明部分中用Private声明的变量的有效范围是其 所在的工程. 答案：N 第5题（1.0分）题号:354 在框架控件上放置的控件可以移动到框架控件的外面. 答案：N 第6题（1.0分）题号:231 可以用"&","+"合并字符串,但是用在变异变量时,"+"可能会将两个数值加起来.答案：Y 第8题（1.0分）题号:247 Circle方法绘制扇形或圆弧图形时,图形的形状不仅与起始角、终止角的大小相关,而且与起始角、终止角的正或负相关.答案：Y 第9题（1.0分）题号:330 有一个程序在属性窗口中设置了它的窗体字体大小为10号,而程序代码若设置了它的窗体字体大小为20号,那么当程序运行后实际的窗体字体大小为20号.答案：Y 第10题（1.0分）题号:225 Visual Basic程序的运行可以从Main()过程启动,也可以从某 个窗体启动. 答案：Y 第1题（1.0分）题号:319 能够改变窗体边框线类型的属性是(). A:FontStyleB:BorderStyleC:BackStyleD:Bord er 答案：B 第2题（1.0分）题号:822 以下()对象不具有Clear方法. A:列表框B:组合框C:剪贴板D:图片框 答案：D 第3题（1.0分）题号:258 常量-0.00013579的科学计数法是(). A:-1,3579E+0.4B:.00013579C:-13.579E-5D:-1.3579E-0.4 答案：C 第4题（1.0分）题号:230 vb 应用程序是分层管理的,其最高的层次为(). A:工程B:模块C:窗体D:过程 答案：A 第5题（1.0分）题号:837 用户可以通过设置菜单项的()属性值为FALSE来使该菜单项不可见. A:HideB:CheckedC:VisibleD:Enabled答案：C 第6题（1.0分）题号:334 若要使标签控件显示时,不覆盖其背景内容,
九江学院期末考试复习题（政法A1111）第一套 一、判断题 1、Visual Basic程序开发的特点是面向对象的事件驱动。（√） 2、Print_Text 是一个不合法的变量名。（×） 3、窗体的AutoRedraw属性实现了屏幕图像的重建。（√） 4、设置字体大小应使用Font属性（×） 5、Sub过程可以实现嵌套调用（√） 6、IIF函数中的三个参数都不能省略。（√） 7、块结构条件语句以End If结束，而单行结构条件语句没有End IF。（√） 8、当终值小于初值时，步长为负数。（√） 9、执行While-Wend循环时，如果一开始条件就不成立，则语句块一次也不会执行。（√） 10、关于数组的引用,在程序中,凡是简单变量可以出现的地方都可以出现数组元素的引用(√) 二、单项选择题 1．Print Format（123，”####”）执行之后的结果为 A）＃123B）123C）123＃D）＃＃＃＃ 【答案】B 2．下面可以表示注释语句开头的为 A）Re B）R C）Rem D）dim 【答案】C 3．下列选项中窗体载入事件为
A）Load事件B）Click事件C）DblClick事件D）Unload事件 【答案】A 4．Timer控件可以使用下列哪种事件 A）Click事件B）Timer事件C）Dblclick事件D）Change事件 【答案】B 5．在InputBox函数中哪一个参数是必须的 A）Prompt B）Buttons C）Title D）Context 【答案】A 6．以下叙述中错误的是： A）如果过程被定义为Static类型，则该过程中的局部变量都是Static类型B）Sub过程中不能嵌套定义Sub过程 C）Sub过程可以嵌套调用Sub过程 D）事件过程可以像通用过程一样由用户定义过程名 【答案】C 7．要填加一个标准模块，可使用“_____”菜单中的“添加模块”命令。 A）文件B）视图C）工程D）工具 【答案】C 8．在块结构条件语句If-Then / Endif中 (A)必须至少有一个Elseif语句 (B )可以有任意多个ElseIf-Then语句 (C)如果没有Else语句，运行时将出现错误
2011-2012学年第一学期算法与程序设计期末考试题 班级：姓名：分数： 一、单项选择题（每题4分） 1.算法是解决问题的( ) A.程序代码 B.方法与步骤 C.计算公式 D.最终结果 2.以下不能作为vb常量的的是( ) A.“Good Luck” B. PI C. 1.5E-3 D. 16.34 3.以下各表达式中, 计算结果为0的是( ) A. INT(12.4)+INT(-12.6) B. CINT(12.4)+CINT(-12.6) C. FIX(13.6)+FIX(-12.6) D. FIX(12.4)+FIX(-12.6) 4.设a=″Visual Basic″，下面使b=″Basic″的语句是( ) A.b=Left(a，8，12) B.b=Mid(a，8，5) C.b=Right(a，5，5) D.b=Left(a，8,5) 5.inputbox() 函数返回值类型为( ) A.数值 B.字符串 C.数值和字符串 D.变体 6.下列关于For…Next语句的说法正确的是( ) A. 循环变量、初值、终值和步长都必须为数值型 B.Step后的步长只能为正数 C. 初值必须小于终值 D.初值必须大于终值 7.下列符号中，只有( )是合法的VB变量名。 A．xy23 B．23xy C．Sub D．xy8[1] 8.数学表达式Sin30°写成VB表达式是( ) A．Sin30 B．Sin(30) C．Sin(30°) D．Sin(30*3.14/180) 9.在VB的运算中，级别最高的是( ) A．= B．And C．Or D．Not 10.判断任意3条线段a、b、c能否构成三角形的表达式为( ) A．a+b>=c Or a+c>=b Or b+c>=a B．Not(a+b
第一部分：客观题 一、单项选择题 1、在窗体模块的通用段中声明变量时，不能使用的关键字是（） A、 Dim B、 Public C、Private D、 Static 2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（） A、工程资源管理器窗口 B、工具箱窗口 C、属性窗口 D、代码窗口 3、若要使某可见控件获得焦点，可使用（）方法来实现。 Ａ、RefreshＢ、SetfocusＣ、GotfocusＤ、Value 4、下列不可作为VB变量名的是（） A、ABT1 B、Alpha C、ABC D、4*Delta 5、表达式 5 Mod 3+3\5*2的值是（） A、 0 B、 6 C、4 D、 2 6、下列语句中，正确的赋值语句是（） A、 i + j = 10 B、 2i = j C、 j = i + j D、 i * j = 0 7、执行下列程序段后，x的值是（）。
n = 4: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n A、 2 B、 6 C、 10 D、 14 8、当用户在窗体上单击鼠标时，不会触发的事件是（） Ａ、ClickＢ、MouseDownＣ、MouseUpＤ、DblClick 9、下列为整型变量的是（） A、 x! B、 x# C、x$ D、 x% 10、要从For循环中直接退出循环，可使用的语句( )。 A、Exit Do B、Exit Loop C、Exit For D、Stop 11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是（） A、x Mod 2 =1 Or y Mod 2 =1 B、x Mod 2 =0 Or y Mod 2=0 C、x Mod 2 =0 And y Mod 2=0 D、x Mod 2 =1 And y Mod 2 =1 12、在通用声明中给出Option Base 1语句，则数组a包含（）个数组元素。 Dim a(3, -2 To 1, 5) As Integer A、60 B、75 C、120 D、13
第一部分：客观题 1、 单项选择题 1、在窗体模块的通用段中声明变量时，不能使用的关键字是（ ） A、 Dim B、 Public C、Private D、 Static 2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是 （ ） A、工程资源管理器窗口 B、工具箱窗口 C、 属性窗口 D、代码窗口 3、若要使某可见控件获得焦点，可使用（ ）方法来实现。 Ａ、Refresh Ｂ、Setfocus Ｃ、Gotfocus Ｄ、Value 4、下列不可作为VB变量名的是（ ） A、ABT1 B、Alpha C、ABC D、4*Delta 5、表达式 5 Mod 3+3\5*2的值是 （ ） A、 0 B、 6 C、4 D、 2 6、下列语句中，正确的赋值语句是（ ） A、 i + j = 10 B、 2i = j C、 j = i + j D、 i * j = 0 7、执行下列程序段后，x的值是（ ）。 n = 4: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n A、 2 B、 6 C、 10 D、 14 8、当用户在窗体上单击鼠标时，不会触发的事件是（ ） Ａ、Click Ｂ、MouseDown Ｃ、MouseUp Ｄ、DblClick 9、下列为整型变量的是（ ） A、 x! B、 x# C、x$ D、 x% 10、要从For循环中直接退出循环，可使用的语句( )。 A、Exit Do B、Exit Loop C、Exit For D、Stop 11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是 （ ） A、x Mod 2 =1 Or y Mod 2 =1 B、x Mod 2 =0 Or y Mod 2=0
大一VB期末考试试卷及答案 1．在代码中引用一个控件时，应使用控件的（ b ）属性。 A．Caption B．Name C．Text D．Index 2．设变量x = 4，y = -1，a = 7，b = -8,下面表达式（ a ）的值为“假”。 A．x+a <= b-y B． x > 0 AND y < 0 C．a = b OR x>y D． x+y > a+b AND NOT (y < b) 3．表达式Int(Rnd*71)+10产生的随机整数范围是（ c ）。 A．（10，80） B．（10，81） C．[10，80] D．[10，81] 4．函数Sgn(3.1416)的返回值是（ c ）。 A．-1 B．0 C．1 D．以上都不对 5．67890属于（ d ）类型数据。 A．整型 B．单精度浮点数 C．货币型 D．长整型 6．下列变量名中正确的是（ d ）。 A．3S B．Print C．Select My Name D．Select_1 7．下列赋值语句（ a ）是有效的。 A．sum = sum -sum B．x+2 = x + 2 C．x + y = sum D．last = y / 0 8．以下的控件或方法具有输入和输出双重功能的为（ b ）。 A．Print B．Textbox C．Optionbutton D．Checkbox 9．若要获得列表框中被选中的列表项的内容，可以通过访问（ d ）属性来实现。 A．Name B．ListIndex C．ListCount D．Text 10．下列代码的运行结果为（ b ）。 Private Sub command1_click() Dim m(10)
高级语言程序设计（VB）试卷（A卷） 注意事项：1、本试卷共页，满分为100 分，考试时间为110 分钟。 2、标准答题卡使用2B铅笔涂写；文字题答题时请使用蓝、黑钢笔或圆珠笔， 不得使用红颜色墨水笔。 一、单项选择题（每空1分，共30分） （请将答案按照题干上【】内的序号涂写“标准答题卡”，否则不得分） 1．在VB 6.0中，扩展名为.vbp的文件称为【1】。 A) 工程文件B) 窗体文件C) 类模块文件D) 标准模块文件 2．在VB 6.0集成开发环境的设计模式下，用鼠标双击窗体上的某个对象后，打开的窗口是【2】。 A) 代码窗口B) 窗体设计窗口 C) 属性窗口D) 工程资源管理器窗口 3．设有变量定义语句Dim a%，则变量a的数据类型是【3】。 A) 整型B) 单精度类型C) 双精度类型D) 字符串类型4．下列表达式中，值为False的是【4】。 A) "AB"<"abc"B) "ABC" = UCase("abc") C) "ABCD"<"abc"D) Mid("ABCD",3,1)=Left("ABCD",3) 5．函数InStr("ABCDEF", "CD")的值是【5】。 A) 2B) 3C) True D) CDEF 6．下列程序运行后，单击窗体，输出结果是【6】。 Private Sub Form_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) ? ??≠≥=<=)(2) c (1 d c b a d b a x 且且 B) ? ??≠<=<=)(2) c (1 d c b a d b a x 且且 C) ?? ?≥=<=)(2) c (1b a d b a x 且 D) ?? ?≠=<=) (2) c (1 d c d b a x 且 9．下列程序运行后，单击窗体，输出结果是 【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
试卷方案：201105 Visual Basic 期末考试方案 一、单项选择_共50题（选：20题*1’=20分） 第1题 以下有关对象属性的说法中，错误的是___________. A. 工具箱中的控件并不是VB 中所有的控件 B. 若将Frame 的Enabled 属性设置为False ，则不能使用放置在Frame 里面的控件 C. 对象的Name 属性在运行时不能改变 D. 对象的所有属性都可以在属性窗口中设置 第2题 数学表达式 ||27sin 3 y x e x +++ 的VB 算术表达式为_______ . A. Sin(27)+Sqr(x+Exp3)/(x+y) B. Sin(27*3.14159/180)+Sqr(x+Exp(3))/Abs(x+y) C. Sin(27*3.14159/180)+Sqr(x+e^3)/Abs(x+y) D. Sin(27*pi/180)+Sqr(x+Exp(3)/Abs(x+y) 第3题 下列有关对象的叙述中,正确的是______ A. 对象由属性，事件和方法构成 B. 对象的所有属性既可以在属性窗口设置，又可以在程序运行时用赋值语句设置 C. 对象的事件一定就是由VB 预先设置好的人工干预的动作 D. 对象的方法是对象响应某个事件后执行的一段程序代码 第4题 表达式CInt(4.5)+Cint(-4.51)+Int(4.9)+Int(-4.1)+Fix(-1.9)+0 Mod 2的运算结果是___. A. 1 B. -1 C. –2 D. –3 第5题 下列关于菜单的说法中,错误的是__________. A. 每一个菜单项就是一个对象，并且可设置自己的属性和事件 B. 菜单项不可以响应DblClick 事件 C. VB6.0允许创建超过四级的子菜单 D. 程序执行时，如果要求菜单项是灰色，不能被用户选择，则应设置菜单项的Enabled 属性为False 第6题 以下关于数组的说法中,错误的是__________. A. 使用了Preserve 子句的Redim 语句，只允许改变数组最后一维的上界 B. 对于动态数组, Redim 语句可以改变其维界但不可以改变其数据类型 C. Erase 语句的功能只是对固定大小的数组进行初始化 D. Lbound 函数返回值是指定数组某一维的下界 第7题 设a=3,b=2,c=1,运行print a>b>c 的结果是____________. A. True B. False C. 1 D. 出错 第8题
VB期末考试试题A卷 一、填空题 1、VB程序设计的主要特点是（1）和（2）。 2、在VB中，最主要的两种对象是（3）和（4）。 3、工程是构成应用程序文件的（5）。 4、方法是VB提供的一种（6），用来完成一定的操作。 5、浮点类型数据包括单精度型和___（7）__数据。 6、事件是窗体或控件对象识别的___（8）____。 7、可用窗体的___（9）_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的（11）和（12）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的（13）出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用（14）作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是（15）。 13、在VB 中，数值型变量的初值为（16），Varant型变量的初值为（17），布尔型变量的初值为（18）。 14、设置窗体的（19）属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句（20）。 二、选择题 1、菜单控件只包括一个事件，即（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是（2）。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示（3）。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是（4）。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（5）。
期期末末考考试试题题 一、单项选择题（共10分） 1．在代码中引用一个控件时，应使用控件的（ ）属性。 A ．Caption B ．Name C ．Text D ．Index 2．设变量x = 4，y = -1，a = 7，b = -8,下面表达式（ ）的值为“假”。 A ．x+a <= b-y B ． x > 0 AND y < 0 C ．a = b OR x>y D ． x+y > a+b AND NOT (y < b) 3．表达式Int(Rnd*71)+10产生的随机整数范围是（ ）。 A ．（10，80） B ．（10，81） C ．[10，80] D ．[10，81] 4．函数Sgn(3.1416)的返回值是（ ）。 A ．-1 B ．0 C ．1 D ．以上都不对 5．67890属于（ ）类型数据。 A ．整型 B ．单精度浮点数 C ．货币型 D ．长整型 6．下列变量名中正确的是（ ）。 A ．3S B ．Print C ．Select My Name D ．Select_1 7．下列赋值语句（ ）是有效的。 A ．sum = sum -sum B ．x+2 = x + 2 C ．x + y = sum D ．last = y / 0 8．以下的控件或方法具有输入和输出双重功能的为（ ）。 A ．Print B ．Textbox C ．Optionbutton D ．Checkbox 9．若要获得列表框中被选中的列表项的内容，可以通过访问（ ）属性来实现。 A ．Name B ．ListIndex C ．ListCount D ．Text 10．下列代码的运行结果为（ ）。 Private Sub command1_click() Dim m(10) For k = 1 To 10 m(k) = 11 – k next k
VB期末考试试题及答案 一、填空题 1、VB程序设计的主要特点是可视化设计和事件 编程。2、在VB中，最主要的两种对象是窗体 （form）和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB提供的一种特殊子程序，用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作____。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的高度（height）和宽度（width）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用工程1 作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是34.6 。 13、在VB 中，数值型变量的初值为0 ，Varant型变量的初值 为空，布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句cls 。 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。
VB期末考试上机题编程答案 1.新建一个工程，编写一个找出所有四位幸运数显示在列表框中，并将幸运数的个数显示在文本框中。所谓幸运数是指凡前两位数字之和等于后两位数字之和的四位数。将原窗体文件和工程文件分别另存为为f.frm和p.vbp，保存在D盘的VBTest文件夹中。如不按要求保存，造成文件无法上传，后果自负！ 具体要求： 1、程序参考界面如图所示，编程时不得增加或减少界面对象或改变对象的种类，窗体及界面元素大小适中，且均可见； 2、单击"查找"按钮，则开始查找并在列表框中显示结果，并在文本框中显示幸运数的个数； 3、单击“清除”按钮，则将列表框和文本框清空； 4、单击“退出”按钮，结束程序运行； 5、程序中应包含一个过程，用于判断一个数是否是幸运数。 解：Private Sub Command1_Click() Dim i As Integer, a As Integer For i = 1000 To 9999 If k(i) Then List1.AddItem i: a = a + 1 Next i Text1.Text = a End Sub Private Sub Command2_Click()
List1.Clear Text1.Text = "" End Sub Private Sub Command3_Click() End End Sub Private Function k(n As Integer) As Integer Dim i As Integer, a As Integer, s1 As Integer, s2 As Integer Dim s As String s = CStr(n) For i = 1 To Len(s) / 2 s1 = s1 + Mid(s, i, 1) s2 = s2 + Mid(s, Len(s) + 1 - i, 1) Next i If s1 = s2 Then k = True End Function 2. 新建一个工程，编写求某一自然数因子和的程序。要求通过文本框获取输入的自然数，计算后将所计算得到的因子和显示在另一文本框中。将原窗体文件和工程文件分别另存为为f.frm和p.vbp，保存在D盘的VBTest文件夹中。如不按要求保存，造成文件无法上传，后果自负！ 具体要求：
VB期末考试试题及答案 二、选择题 1、菜单控件只包括一个事件,即 C ,当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外得所有菜单控件都能识别该事件。A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)得Max属性所设置得就是 A 。 A、滚动框处于最右位置时,一个滚动条位置得Value属性最大设置值 B、单击滚动条与滚动箭头之间得区域时,滚动条中滚动块得最大移动量 C、单击滚动条得箭头区域时,滚动条中滚动块得最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中得*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中,不属于标签得属性就是 C 。
A、Enabled B、Caption C、 Default D、Font 5、要求改命令按钮显示得文本,应当在属性窗口中改变得属性就 是 A 。 A、Caption B、Name C、 Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项得选中状态,应当在属性窗口中改变得属性就是 D 。 A、Caption B、Name C、 Text D、Value 7、允许在菜单项得左边设置打勾标记,下面哪种论述就是正确 得？ D 。 A、在标题项中输入&,然后打勾 B、在索引项中打勾 C、在有效项中打 勾D、在复选项中打勾 8、当执行以下过程时,在窗体上将显示 A 。 Private Sub mand1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、VBHello!VB B、VB Hello!VB C、VB D、VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2得结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件就是容器控件 B 。 A、Image B、Picture C、 boBox D、 11、若要将窗体从内存中卸载出去,其实现得方法就是 D 。
1下列语句都是在Form中定义，__C____是错的。 A.Public a3 As Integer B.Private Const A2 = 8 C.Public Const A1 = 2u D.Private a4 As Integer 2 在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() For i = 1 To 4 If i = 1 Then x = i If i <= 4 Then x = x + 1 Print x; Next i End Sub 程序运行后，单击命令按钮，其输出结果为：___A___。 A. 2 3 4 5 B. 1 2 3 4 C. 2 3 4 4 D. 3 4 5 6 3如果要在菜单中添加一个分隔线，则应将其Caption属性设置为__A____。 A.– B.* C.& D.＝ 4下列程序段的执行结果为___B___。 A = 0: B = 1 Do A = A + B B = B + 1 Loop While A < 10 Print A; B A. A B B.10 5 C.0 1 D.10 30 5设在菜单编辑器中定义了一个菜单项，名为menu1。为了在运行时隐藏该菜单项，应使用的语句是___A___。 A.menu1.Visible=False B.menu1.Enabled=False C.menu1.Visible=True D.menu1.Enabled=True
6. 以下叙述中正确的是___C___。 A.可以在运行期间改变窗体的Name属性的值 B. 窗体的Name属性值是显示在窗体标题栏中的文本 C. 窗体的Name属性指定窗体的名称，用来标识一个窗体 D. 窗体的Name属性值可以为空 7. 下列不能打开菜单编辑器的操作是__A____。 A. 按Shift+Alt+M B. 单击工具栏中的"菜单编辑器"按钮 C. 执行"工具"菜单中的"菜单编辑器"命令 D. 按Ctrl+E 8. 在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。 设有如下的类型和变量声明： Private Type Person name As String*8 major As String*20 End Type Dim p As Person 设文本框中的数据已正确地赋值给Person类型的变量p，当单击"保存"按钮时，能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是__A___。 A. Open "c:\Test2.dat" For Random As #1 Len = Len(p) Put #1,1,p Close #1 B. Open "c:\Test2.dat" For Output As #1 Put #1,1,p Close #1 C. Open "c:\Test2.dat" For Random As #1 Len = Len(p) Get #1,1,p Close #1 D. Open "c:\Test2.dat" For Random As #1 Get #1,1,p Close #1 9. 以下关于图片框控件的说法中，错误的是__B____。 A. 可以通过Print方法在图片框中输出文本 B. 用Stretch属性可以自动调整图片框中图形的大小 C. 图片框控件可以作为容器使用 D. 清空图片框控件中图形的方法之一是加载一个空图形 10.在窗体上画一个文本框（其名称为Text1）和一个标签（其名称为Label1）。要求程序运行后，如果在文本框中输入字符，则立即在标签中显示相同的内容。以下可以实现上述
VB期末考试试题一、填空题 1、VB程序设计的主要特点是（1）和（2）。 2、在VB中，最主要的两种对象是（3）和（4）。“““””” 3、工程是构成应用程序文件的（5）。 4、方法是VB提供的一种（6），用来完成一定的操作。 5、浮点类型数据包括单精度型和___（7）__数据。 6、事件是窗体或控件对象识别的___（8）____。 7、可用窗体的___（9）_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的（11）和（12）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的（13）出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用（14）作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是（15）。 13、在VB 中，数值型变量的初值为（16），Varant型变量的初值为（17），布尔型变量的初值为（18）。 14、设置窗体的（19）属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句（20）。 二、选择题 1、菜单控件只包括一个事件，即（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是（2）。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示（3）。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是（4）。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（5）。 A、Caption B、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是（6）。 A、Caption B、Name C、Text D、Value 7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？（7）。 A、在标题项中输入&，然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示（8）。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB
一、基本操作题 请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。 1、在名称为Form1的窗体上画一个名称为Chk1的复选框数组（Index属性从0开始）， 含三个复选框，其标题分别为“语文”、“数学”、“英语”。利用属性窗口设置适当的属性，使“语文”未选，“数学”被选中，“英语”为灰色，再把窗体的标题设置为“选课”，程序运行时的窗体界面如图所示。 2、在名称为窗体上画一个命令按钮，其名称为Cmd1，标题为“清除”。请编写适当的事 件过程，使得程序运行后，窗体上的标题为“VB期末上机考试”，如图1所示，如单击命令按钮，则清除窗体的标题，程序运行时的窗体界面如图2所示。 Private Sub Command1_Click() Form1.Caption = "" End Sub Private Sub Form_Load() Form1.Caption = "VB期末考试" End Sub 图1 图2 3、在名称为Form1的窗体上画一个命令按钮，其名称为Cmd1，标题为“移到左上”。编写适当的事件过程，使程序运行时，如单击命令按钮，则按钮移到窗体的左上角。程序中不得使用任何变量。程序运行时的窗体界面如图。 Private Sub Command1_Click() Command1.Top = 0: Command1.Left = 0 End Sub 4、在名称为Form1的窗体上建立一个名称为L1的标签，标题为“选课”，其字号大小为4号；再建立三个复选框，名称分别为Chk1、Chk2、Chk3，标题分别为“操作系统”、“数据库原理”、和“概率论”，字体大小均为14，其中“概率论”被禁用，运行界面如图。
安全土木化工化学vb 练习题 4 满分： 111 分 姓名： ________ 1、单项选择题 (本题共计 60 分 ) 1、在过程调用中，参数的传递可以分为________________ 和 ________________ 两种方式。( ) A 、按值传递按地址传递 B 、按地址传递按参数传递 C、按参数传递按值传递 D、按位置传递按参数传递 2、下面的过程定义语句中合法的是________________________ 。( ) A 、 Sub Procl (ByVal n () ) B 、Sub Procl ( n ) As Integer C、 Function Procl (Procl ) D、 Function Procl (ByVal n ) 3、在参数传递过程中，使用关键字________________ 来修饰参数，可以使之按值传递。( ) A 、 ByVal B 、ByRef C、 Value D、 Reference 4、要想在过程调用后返回两个结果，下面的过程定义语句合法的是________________ 。( ) A 、 Sub Procl ( ByVal n , ByVal m) B 、Sub Procl ( n , ByVal m) C、 Sub Procl ( n , m) D、 Sub Procl ( ByVal n , m) 5、通用过程可以通过执行“工具”菜单中的____________ 命令来建立。( ) A、添加过程 B、通用过程 C、添加窗体 D、添加模块 6、可以在窗体模块的通用声明段中声明的是________________ 。( ) A、全局变量 B、全局常量 C、全局数组 D、全局用户自定义类型 7、当运行程序时，系统自动执行启动窗体的____________ 事件过程。( ) A 、 Load B、Click C、 UnLoad D、 GotFocus