07VB程序设计期末考试

合集下载

VB期末考试考卷及答案

VB期末考试考卷及答案一、选择题（每题1分，共5分）1. 在VB中，下列哪个函数用于返回字符串的长度？A. Len()B. Length()C. Size()D. Count()A. DimB. IntegerC. IntD. Var3. 在VB中，下列哪个语句用于退出当前循环？A. Exit ForB. BreakC. Exit DoD. ContinueA. OpenB. LoadC. CreateD. Read5. 在VB中，下列哪个事件在窗体加载时发生？A. LoadB. InitializeC. FormLoadD. FormOpen二、判断题（每题1分，共5分）1. VB中的变量必须先声明后使用。

（）2. 在VB中，Sub过程可以返回值。

（）3. VB中的数组下标从1开始。

（）4. 在VB中，可以使用Select Case语句进行多条件判断。

（）5. VB中的字符串可以用单引号(')表示。

（）三、填空题（每题1分，共5分）1. 在VB中，用于声明常量的关键字是______。

2. VB中的逻辑运算符包括______、______和______。

3. 在VB中，要实现两个变量的值交换，可以使用______变量作为中间变量。

4. 在VB中，______方法用于设置文本框的字体。

5. VB中的______事件在用户单击按钮时发生。

四、简答题（每题2分，共10分）1. 简述VB中事件的执行过程。

2. 请列举三种VB中的数据类型。

3. 简述如何使用Select Case语句进行多条件判断。

4. 请说明如何使用VB中的循环结构实现1到100的累加。

5. 简述如何使用VB中的文件操作函数读取文件内容。

五、应用题（每题2分，共10分）1. 编写一个VB程序，计算并输出1到100之间所有偶数的和。

2. 编写一个VB程序，实现用户输入一个字符串，程序将其逆序输出。

3. 编写一个VB程序，使用循环结构输出九九乘法表。

vb期末考试题和答案

vb期末考试题和答案1．在代码中引用一个控件时，应使用控件的（ b ）属性。

A．Caption B．Name C．Text D．Index2．设变量x = 4，y = -1，a = 7，b = -8,下面表达式（ a ）的值为“假”。

A．x+a<= b-y B． x> 0 AND y < 0C．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_17．下列赋值语句（ a ）是有效的。

A．sum = sum-sum B．x+2 = x + 2 C．x + y =sum D．last = y / 08．以下的控件或方法具有输入和输出双重功能的为（ b ）。

A．Print B．Textbox C．Optionbutton D．Checkbox 9．若要获得列表框中被选中的列表项的内容，可以通过访问（ d ）属性来实现。

A．Name B．ListIndex C．ListCount D．Text10．下列代码的运行结果为（ b ）。

Private Sub command1_click()Dim m(10)For k = 1 To 10m(k) = 11 - kNext kx = 5Print m(2 + m(x))End SubA．2 B．3 C．4 D．5二、填空题（10分）1．写出整数n能同时被13和17整除的Basic表达式： n Mod 13=0 And n Mod17=0 。

VB程序设计试题及参考答案

VB程序设计及参考答案一、单选题（共20分，每小题1分）1、要改变控件的宽度，应修改该控件的（）属性。

（A）TOP （B）width （C）Left （D）Height2、将命令按钮Command1设置为不可见，应修改该命令按钮的（）属性。

（A）Visible （B）Value （C）Caption （D）Enabled3、（）对象具有clear方法。

（A）图片框（B）窗体（C）复选框（D）列表框4、启动VB后，就意味着要建立一个新（）。

（A）窗体（B）文件（C）工程（D）程序5、下列（）对象不具有Clear方法。

（A）列表框（B）组合框（C）剪贴框（D）图片框6、组合框有三种风格，它们由Style属性所决定，其中为简单组合框时，Style 属性值应为（）（A）0 （B）1 （C）2 （D）37、下列可调整图片框的大小以适合图片的属性是（）（A）Stretch （B）autosize （C）picture （D）oledropmode 8、要想清除文本框中的内容则可利用（）进行。

（A）Caption （B）Text （C）Clear （D）Cls9、在文本框控件中将Text的内容全部显示为所定义的字符的属性是（）。

（A）Password （B）PasswordChar（C）需要编程来实现（D）以上都不是10、Visual Basic是一种面向对象的程序设计语言，所采用的编程机制是（）。

（A）从主程序开始执行（B）按过程顺序执行（C）事件驱动（D）按模块顺序执行11、下列四项中合法的变量名是（）。

（A）a-bc （B）a_bc （C）4abc （D）integer12、无论何种控件，共同具有的属性是（）（A）Text （B）Name （C）Caption （D）ForeColor13、有程序代码如下：Text1.Text = "Visual Basic程序设计"则Text1、Text ，和"Visual Basic程序设计"分别代表（）。

VB期末考试试卷及答案

VB期末考试试卷及答案一·选择题1。

Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（B ) A属性、控件和方法B属性、事件和方法C窗体、控件和过程 D控件、过程和模块2。

所有控件都有一个共同的属性，这个属性是（C ）A textB fontC nameD caption3。

下列叙述中错误的是（A ）A 工程文件扩展名是。

vbgB 标准模块文件的扩展名是.basC 窗体模块的扩展名是.frmD 类模块的扩展名是.cls4. 当要编写一个新的Visual Basic程序时，所做的第一件事是（A ）A 新建一个工程B 编写代码C 设置属性D 添加Active X控件5. 下面控件中,没有caption属性的是（B ）A 框架B 组合框C 命令按钮D 复选按钮6。

在文件框中输入字符时，若只显示某个字符，如（*），应设置属性是（B ）A MultiLineB PasswordCharC TextD selText7。

若要将窗体从内存中卸载出去,其实现的方法是( D ）A ShowB HideC LoadD UnLoad8. 下列关于过程叙述不正确的是（D )A 过程的传值调用是将实参的具体值传值传递给形参B 过程的传址调用是将实参在内存的地址传递给形参C 过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的D 无论过程传值调用还是传地址调用，参数传递都是双向的9. 某人创建1个工程，其中的窗体名为Form1，之后又添加了1个名为Form2的窗体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是（C ）A 在Form1的Load事件过程中加入语句Load Form2B 在Form2的Load事件过程中加入语句Form2.ShowC 在“过程属性”对话框中把“启动对象”设置为Form2D 在Form2的TabIndex属性设置为1，把Form1的TabIndex属性设置为210。

VB期末考试题及配套答案

第一套一、判断题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，”####”）执行之后的结果为【答案】BA）＃123 B）123 C）123＃D）＃＃＃＃2．下面可以表示注释语句开头的为【答案】CA）Re B）R C）Rem D）dim3．下列选项中窗体载入事件为【答案】AA）Load事件B）Click事件C）DblClick事件D）Unload事件4．Timer控件可以使用下列哪种事件【答案】BA）Click事件B）Timer事件C）Dblclick事件D）Change事件5．在InputBox函数中哪一个参数是必须的【答案】AA）Prompt B）Buttons C）Title D）Context6．以下叙述中错误的是：【答案】CA）如果过程被定义为Static类型，则该过程中的局部变量都是Static类型B）Sub过程中不能嵌套定义Sub过程C）Sub过程可以嵌套调用Sub过程D）事件过程可以像通用过程一样由用户定义过程名7．要填加一个标准模块，可使用“_____”菜单中的“添加模块”命令。

【答案】CA）文件B）视图C）工程D）工具8．在块结构条件语句If-Then / Endif中【答案】B(A) 必须至少有一个Elseif语句(B ) 可以有任意多个ElseIf-Then语句(C) 如果没有Else语句，运行时将出现错误(D ) 给定的条件只能是关系表达式或逻辑表达式9．以下Case语句中错误的是【答案】A(A) Case 10 To 1 (B) Case Is>10(C)Case Is>10 , Is<50 (D) Case 3,5,Is>1010．对Do Until…Loop循环，正确的是(【答案】B)。

《VB程序设计》期末考试

《VB程序设计》期末考试注意事项：（1）题型：选择题40道，判断题10道，每题2分，满分100分。

（2）答题时间：60分钟。

（3）请在规定时间内作答并提交。

1、VB程序设计语言是一种（）。

[单选题] *A．汇编语言B．机器语言C．高级语言(正确答案)D．数据库语言2、VisualBasic最突出的特点是（）。

[单选题] *A．结构化程序设计B．程序开发环境C．程序调试技术D．事件驱动编程机制(正确答案)3、VB中，.frm是（）文件的扩展名。

[单选题] *A．工程文件B．可执行文件C．窗体文件(正确答案)D．标准模块文件4、VB中，.vbp是（）文件的扩展名。

[单选题] *A. 工程文件(正确答案)B. 可执行文件C. 窗体文件D. 标准模块文件5、在设计窗体时，双击窗体的任何地方，可以打开的窗口是（）。

[单选题] *A. 代码窗口(正确答案)B. 属性窗口C. 工程管理窗口D. 以上3个选项都不对6、VB是一种面向对象的程序设计语言，下面（）不是面向对象包含的三要素。

[单选题] *A. 变量(正确答案)B. 事件C. 属性D. 方法7、不论任何控件，共同具有的是（）属性。

[单选题] *A. TextB. CaptionC. BackColorD. Name(正确答案)8、要使Form1窗体的标题栏显示“欢迎使用Visual Basic 6.0! ”,以下（）语句是正确的。

[单选题] *A. Form1.Caption =" 欢迎使用Visual Basic 6.0! "(正确答案)B. Form1.Caption =’欢迎使用Visual Basic 6.0! ’C. Form.Caption = " 欢迎使用Visual Basic 6.0! "D. Form.Caption = ’欢迎使用Visual Basic 6.0! ’9、有下面的程序代码：Command1.Caption ="确定"，则Command1，Caption和"确定"分别代表（）。

VB考试题及答案

21 MsgBox()的正确语法是（ D ）。
A、 MsgBox(标题 [，提示信息] [，按钮类型])
B、 MsgBox(提示信息[，标题] [，按钮类型])
C、MsgBox(标题 [，按钮类型] [，提示信息])
D、 MsgBox(提示信息 [，按钮类型] [，标题])
B、将True转换为 1 ，将False转换为 -1
C、将True转换为 0 ，将False转换为 -1
D、将True转换为 -1 ，将False转换为 0
9 表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是(D).
A、SIN
B、4^5
C、3*4
D、x+1
10 如果x=2，则表达式x+1>2 Or sin(x)>0.9 And 3>x+3的值（ B ）。
A、不能计算
B、 True
C、5
D、False
11 随机产生 [10，50] 之间整数的正确表达式是（ D ）。
B、a#x 和 Pi
C、ForLoop 和 Total
D、Const 和 DoWhile
18 函数Len(Str(Val("123.4")))的值为(B).
A、5
B、6
C、8
D、11
19 Int(198.555*100+0.5)/100的值为B
A、199.6
A、157
B、12334
C、123
D、"12334"
7 在一个语句内写多条语句时,用来分隔每条语句的符号是(C).
A、,

VB程序设计编程考试题及答案

VB程序设计编程考试题及答案1。

输入3个数，输出最大的数2。

有一元二次方程:aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根3。

输入一个百分制的成绩，若大于等于60，则用消息框弹出,显示“恭喜！成绩通过！”，若小于60，则弹出消息框，显示“抱歉！成绩没有通过！4。

输入学生的百分制成绩,转换输出为五级制成绩，90～100分转换为优秀，80～89转换为良好,70~79转换为中等，60~69转换为及格,0～60转换为不及格。

5。

随机产生一个三位正整数，然后逆序输出，产生的数与逆序数同时显示。

例如，产生246，输出是642。

6。

输入两个整数，求它们的最大公约数。

7.分别统计1—100中,满足3的倍数、7的倍数的数各有多少。

8。

输入一串字符，统计其中字母A（不区分大小写)出现的次数。

9.我国目前有13亿人口，按人口年增长率0.8%计算，多少年后我国人口将超过26亿。

10。

小猴有桃若干，第一天吃掉一半多一个;第二天吃剩下桃子的一半多一个；以后每天都吃尚存桃子的一半多一个,到第7天只剩一个，问小猴原有桃多少？11.百元买百鸡问题。

假定小鸡每只5角，公鸡每只2元,母鸡每只3元，编程求解购鸡方案。

12。

编程求斐波那契数列前11项。

(斐波那契数列:F(0）=f（1)=1, F（n)=F（n—1）+F(n —2) n〉=2 ）13。

已知有序数组a（)，编程插入x（x的值为14）。

数组a中的元素分别为{12，6,4，89，75,63，100,20,31}。

14。

找出被3、5、7除,余数均为1的最小的5个正整数。

15利用随机函数产生50～100范围内的20个随机数，显示其中的最大值、最小值和平均值. 16。

编一函数，统计字符串中汉字的个数。

1.输入3个数,输出最大的数Private Sub command1_click（）Dim maxFor i = 1 To 3n = Val（InputBox（"输入第" ＆i ＆"个数")）If n > max Thenmax = nEnd IfNextPrint "三个数中最大的数是”; maxEnd Sub2.有一元二次方程：aX2+bX+c=0，依次输入a，b,c，判断此方程是否有实根Private Sub Command1_Click(）Dim a，b, c，nb = Text2c = Text3n = b * b — 4 * a ＊cIf n >= 0 ThenLabel4 = ”方程有根”ElseLabel4 = ”方程无根”End IfEnd Sub3.输入一个百分制的成绩，若大于等于60，则用消息框弹出，显示“恭喜！成绩通过!”，若小于60,则弹出消息框,显示“抱歉！成绩没有通过！Private Sub Form_Load(）Text1 = ""End SubPrivate Sub Command1_Click（）Dim nn = Text1If n 〉60 ThenVal （MsgBox（"恭喜！成绩通过!"）)ElseVal （MsgBox（”抱歉!成绩没有通过！"））End IfEnd Sub4.输入学生的百分制成绩，转换输出为五级制成绩，90～100分转换为优秀,80～89转换为良好,70~79转换为中等，60～69转换为及格，0～60转换为不及格。

(整理)VB程序设计期末试卷及答案.

选择题1. Visual Basic中的窗体文件的扩展名是A、.regB、.frmC、.basD、.vbp2. Visual Basic中的模块文件的扩展名是A、.regB、.frmC、.basD、.vbp3. Visual Basic中的工程文件的扩展名是A、.regB、.frmC、.basD、.vbp4. 一个对象可以执行的动作和可被对象识别的动作分别称为A、事件、方法B、方法、事件C、属性、方法D、过程、事件5要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，要对下列属性进行设置。

A．MaxButton B．Width C．MinButtonD．BorderStyle6 在用菜单编辑器设计菜单时，必需输入的项有＿＿＿＿。

A．快捷键B．索引C．标题D．名称8 文件号最大可取的值为A 255 B511 C512 D2569 以下能判断是否到达文件尾的函数是＿＿＿＿A BOFB LOC C LOFD EOF10 Visual basic 常见的颜色设置中，表示红色的是A vbblueB vbredC vbblackD vbcyan11当使用line方法画直线后，当前坐标在A （0,0）B 直线起点C 直线终点D容器的中心12语句circle（500,500），300,8，-6，-3将绘制A圆 B 椭圆 C 圆弧D扇形13坐标度量单位可以通过来改变A DrawstyleB DrawwidthC ScaleD Scalemode14对象的边框类型由设置A DrawstyleB DrawwidthC BorderstyleD Scalemode 15以下的属性和方法中可重新定义坐标系A DrawstyleB DrawwidthC ScaleD Scalemode16执行语句line（1200,1200）——step(1000,500),B后，CurrentX=A 2200B 1200C 1000D 170017 在下列通用对话框的叙述中，错误的是A Commondialogl.showfont显示字体对话框B 在打开或另存为对话框中，用户选择的文件名可以通过Filetitle 属性返回C在打开或另存为对话框中，用户选择的文件名及其路径可以经Filetitle属性返回D 通过对话框可以用来制作和显示帮助对话框填空题1如果要将某个菜单项设计为分隔线，则该菜单的标题应设置为-(减号)。

VB期末考试试题及答案

VB期末考试试题及答案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、GotFocusB、LoadC、Click D、KeyDown2、滚动条控件(如图所示)的Max属性所设置的是 A 。

A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量D、滚动条控件无该属性3、SQL 语句Select * Form student 中的*表示 B 。

A、所有记录B、所有字段C、所有表D、都不对4、以下选项中，不属于标签的属性是 C 。

《VisualBASIC程序设计》期末考试选择题复习（180题）

1. Visual Basic集成开发环境中不包括下列哪些窗口( )。

A、工具箱窗口、工具箱窗口B、工程资源管理器窗口、工程资源管理器窗口C、属性窗口、属性窗口D、命令窗口、命令窗口参考答案是：D2. 在设计应用程序时，通过( )窗口可以查看到应用程序工程中的所有组成部分。

窗口可以查看到应用程序工程中的所有组成部分。

A、代码窗口、代码窗口B、窗体设计窗口、窗体设计窗口C、属性窗口、属性窗口D、工程资源管理器窗口、工程资源管理器窗口参考答案是：D3. 在正常安装Visual Basic6.0后，可以通过多种方式启动Visual Basic。

以下方式中不能启动Visual Basic的是：( )。

A、通过“开始”菜单中的“程序”命令、通过“开始”菜单中的“程序”命令B、通过“我的电脑”找到vb6.exe，双击该文件名，双击该文件名C、通过“开始”菜单中的“运行”命令、通过“开始”菜单中的“运行”命令D、进入DOS方式，执行vb6.exe文件文件参考答案是：D4. Visual Basic 6.0工程文件的扩展名是( )。

A、.vbpB、.frmC、.basD、.cls参考答案是：A5. Visual Basic6.0是面向( )的程序设计语言。

的程序设计语言。

A、过程、过程B、工程、工程C、事件、事件D、对象、对象参考答案是：D6. 下列关于下列关于 Visual Basic编程特点的叙述中，错误的是( )。

A、Visual Basic 是采用事件驱动编程机制的语言是采用事件驱动编程机制的语言B、构成程序的多个过程没有固定的执行顺序、构成 Visual Basic 程序的多个过程没有固定的执行顺序C、Visual Basic 程序既可以编译运行，也可以解释运行程序既可以编译运行，也可以解释运行D、Visual Basic 程序不是结构化程序，不具备结构化程序的种基本结构程序不是结构化程序，不具备结构化程序的 3 种基本结构参考答案是：D7. Visual Basic 6.0集成开发环境有三种工作状态，不属于三种工作状态之一的是( )。

07年春vb期末考试a卷

页眉内容2006/2007学年第2学期《VB程序设计》期末考试试卷A说明: （1）考生应将答案填写在答卷上，否则作无效处理；（2）考试时间为120分钟。

试题一、判断题（每小题1分，共10分）说明：在以下提供的若干陈述中，逐一判断其正确与否，用A表示正确，用B表示错误。

(1) 属性是Visual Basic对象性质的描述，对象的数据就保存在属性中。

(2) 要使输入文本框的字符始终显示“#”，则应修改其PasswordChar属性为“#”。

(3) 在循环体内，循环变量的值不能被改变。

(4) Sub过程名在过程中必须被赋值。

(5) 若Visual Basic中容器取缺省坐标系，则坐标原点在容器左上角、单位长度为像素。

(6) 移动框架时框架内控件也随之移动，所以框架内控件的Left和Top属性值也随之改变。

(7) 使用单选钮控件数组时，它们响应同一个Click事件，由Index参数值来区分不同的按钮。

(8) 影像框的Stretch属性设置为True时，影像框的大小会根据显示的图片大小进行调整。

(9) 设计菜单中每一个菜单项分别是一个控件，每个控件都有自己的名称。

(10) 若要新建一个磁盘上的顺序文件，可用Output和Append方式打开文件。

试题二、单选题（每小题2分，共20分）(11) 将VB新建的“标准EXE”工程保存在磁盘上，至少会产生(11) 文件。

[A] .frx和.frm[B] .exe和.vbp[C] .vbp和.frm[D] .frm和.bas(12) 语句“Form1.Print Tab(10); "#" ”的作用是在窗体当前输出行(12) 。

[A] 第10列输出字符“#”[B] 第9列输出字符“#”[C] 第11列输出字符“#”[D]输出10个字符“#”(13) 语句Print Fix(-2.7) * Val("12a.5")的显示结果是(13) 。

VB程序设计练习试题-期末练习试题.docx

【程序设计：选择3】当程序开始运行时，在Textl文本框中，输入成绩高于60分，使程序运行显示【合格】，否则显示【不合格】，运行结果如下图所示。

（注：编写双分支行语句命令）【参考代码】If X > = 60 Then S ="合格"Else S ="不合格"【程序设计：选择2】当程序开始运行时，在三个文本框Textl、Text2、Text3中，任意输入三个整数，单击［最大值］【参考代码】max = xIf y > max Thenmax = yEnd IfIf z > max Then max = zEnd If【程序设计：选择4】当程序开始运行时，在Textl 文本框中，输入成绩高于60分，使程序运行显示【合格】，否则显示【不合格】，运行结果如下图所示。

（注：编写双分支块语句命令）【参考代码］If X > = 60 ThenS = “合格“ElseS = “不合格“End If【程序设计：选择1】当程序开始运行时，在三个文本框Textl 、Text2、Text3中，任意输入三个整数，单击［最大值］ W 单分支融 IsklMfiM请分别输入3个整数：如下图所示。

按钮，在Label2上显示三个数中的最大值, （注：使用单分支行语句来编写代码）【参考代码］max = xIf y > max Then max = yIf z > max Then max = z【程序设计：循环9】己经创建如图5所示的窗体界面。

要求：编写程序代码，程序运行时，在文本框Textl 中输入一个正整数n ,单击命令按钮Commandl后，在标签控件Label2上，显示Sum=l+2+3+ +n之和，完成程序后请运行程序，并保存程序。

（注：变量Sum表示累加单元，变量x表示循环控制变量，变量n表示Textl的值，必须使用Do Until .................... Loop语句。

vb期末考试试题(含答案)

《Visual Basic 程序设计》期末考试B卷(附3页答题纸，所有答案写在答题纸上，答题纸单独装订)一、填空题（每空0.5分，共10分）1、 Visual Basic应用程序的窗体文件的扩展名是（）。

2、在属性窗口，属性的显示方式有按（）顺序和按分类顺序。

3、 VB的控件是具有自己的（）、（）和（）的对象。

4、每当一个窗体称为活动窗体时，触发（）事件。

5、 Int(-3.5)的值是（）。

6、表达式（）产生10~90之间的随机整数（包括10和90）。

7、表达式（）表示x是5或者7的倍数。

8、下面程序段显示（）个”*”For i = 1 To 5For j = 2 To iPrint "*";Next jNext i9、获得数组的上界通过（）函数，要获得列表框list数组的元素总个数通过（）属性。

10、Visual Basic变量作用域分为（）、（）、全局变量。

11、在过程中定义的变量，如果想在离开该过程后，还能保存过程中局部变量的值，则应该使用（）关键字在过程中定义局部变量。

12、窗体frm中的全局整型变量x的声明位置在（）段，定义语句为（），在其他模块中存取式书写形式为（）。

13、假定有一个通用对话框控件CommonDialog1，除了用CommonDialog1.Action=1显示打开对话框之外，还可以用（）方法显示。

14、若已经建立了form1、form2两个窗体，默认启动窗体是form1，在程序中若要显示form2窗体，则执行（）语句。

二、选择题（每小题2分，共20分）1、 VB6.0集成开发环境中不能完成的功能是（）。

A、输入编辑源程序B、编译生成可执行程序C、调试运行程序D、自动改正程序中的错误2、有程序代码如下：text1.text=”text1.text”则text1、text、”text1.text”分别代表（）。

A、对象，值，属性B、对象，方法，属性C、对象，属性，值D、属性，对象，值3、要使命令按钮可见而不可操作，要对（）属性进行设置。

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

07VB程序设计期末考试满分：60分姓名：________1、单项选择题(本题共计40分)1、滚动条的坐标系统与它当前的________无关。

( )A、数字刻度B、位置C、尺寸大小D、属性2、设在菜单编辑器中定义了一个菜单项，名为menu1。

为了在运行时让该菜单项变灰，应使用的语句是____________。

( )A、menu1.Enabled=TrueB、menu1.Enabled=FalseC、menu1.Visible=TrueD、menu1. Visible = False3、窗体有一个方法可以使窗体隐藏但不从内存中卸载，该方法是____________。

( )A、ShowB、ReleaseC、HideD、Unload4、假定时钟控件的Interval属性为1000，Enabled属性为True，并且有下面的事件过程，则1秒钟的时候窗体上将输出____________个字母“a”。

Private Sub Timer1_Timer()For i = 1 To 10Print "a"Next iEnd Sub ( )A、1 000次B、10000次C、10次D、以上都不对5、在Form_Click事件中执行如下语句的正确结果是________。

Print Format(1236.54,"+ ## , ## 0.0%") ( )A、123456B、+123,654.0%C、+123,6.54%D、+123,6546、对正实数X的第四位小数四舍五入的VB表达式是________。

( )A、0.001*Int(x+0.0005)B、0.001*(1000*x+0.5)C、0.001*Int(1000*x+5)D、0.001*Int(1000*(x+0.0005))7、若希望在离开某过程后，还能保存该过程中局部变量的值，则应使用________关键字在该过程中定义局部变量。

( )A、DimB、PrivateC、PublicD、Static8、下面的表达试的值为真的是________。

( )A、Mid(“Visual Basic”,1,12)=Right(“Programing Language Visual Basic”,12)B、“ABCRG”> ”abcde”C、Int(134.69) > Cint(134.69)D、78.9/32.77 < = 97.5/43.97 AND –45.4 > 4.989、用于字符串连接的运算符是____________。

( )A、&B、+C、AndD、A、B都可以10、语句Print "5*20" 输出的结果是________。

( )A、"5*20"B、出现错误信息C、5*20D、10011、有如下程序代码：Private Sub Command1_Click( )s=Sin(3.1415926/2)MsgBox sEnd Sub程序运行后，消息对话框显示_________。

( )A、0B、1C、1.5708D、212、在一个语句内写多条语句时，每个语句之间用____________符号分隔。

( )A、，B、：C、、D、；13、语句Print "5*20" 输出的结果是________。

( )A、"5*20"B、出现错误信息C、5*20D、10014、VisualBasic认为下面___________组变量是同一个变量。

( )A、A1和a1B、Sum 和SummaryC、Aver 和AverageD、A1 和A_115、如果a是一个正实数，对x的第3位小数四舍五入的表达式是____________。

( )A、0.01*Int(a+0.005)B、0.01*Int(a+0.05)C、0.01*Int(100*(a+0.005)D、0.01*Int(100*(a+0.05))16、i被j整除的逻辑表达式是________________。

( )A、i/j = 0B、i\j = 0C、i<>0D、i mod j = 017、在一个语句内写多条语句时，每个语句之间用____________符号分隔。

( )A、，B、：C、、D、；18、在Form_Click事件中执行如下语句的正确结果是________。

Print Format(1236.54,"+ ## , ## 0.0%") ( )A、123456B、+123,654.0%C、+123,6.54%D、+123,65419、在文本框Text1中输入数字12，Text2中输入数字34，执行以下语句，只有____________。

可使文本框Text3中显示46。

( )A、Text3. Text=Text1. Text & Text2. TextB、Text3. Text=Val(Text1. Text)+Val(Text2.Text)C、Text3. Text=Text1. Text+Text2.TextD、Text3. Text=Val(Text1. Text) & Val(Text2.Text)20、下面____________是合法的单精度型变量。

( )A、num!B、sum%C、xinte$D、mm21、以下程序输出的结果是____________。

Option Base 1Private Sub Command1_ClickDim a, B(3, 3)a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)For I = 1 To 3For j = 1 To 3B(I, j) = a(I * j)If (I >= j) ThenPrint Tab(j * 3); Format(B(I, j), "###");Next jPrintNext IEnd Sub ( )A、1 2 34 5 67 8 9B、l4 57 8 9C、1 4 72 4 63 6 9D、12 43 6 922、在窗体上画一个命令按钮，然后编写如下事件过程：Option Base 1Private Sub Command1_Click( )Dim a As Varianta = Array(1,2,3,4)j = 1For i = 4 To 1 Step -1s = s + a(i)*jj = j * 10Next iPrint sEnd Sub运行上面的程序，单击命令按钮，其输出结果是_____________。

( )A、4321B、12C、34D、123423、当发生Command1_Click事件后，程序输出结果是________。

Option Base 1 Private Sub Command1_Click() Dim a(4, 4) As Integer,i As Integer,s As Integer s=0 Fori=1 To 4 Forj=1 To 4 a(i, j) = (i-1)*4+j*2 Next j Next i For i = 1 To 4 s=s+a(i, i) Next i Print s End Sub ( )A、28B、32C、30D、4424、要分配存放如下方阵的数据，____________数组声明语句能实现(不能浪费空间)。

每行三个元素，第一行为：1.1 2.2 3.3第二行为：4.4 5.5 6.6第三行为：7.7 8.8 9.9 ( )A、Dim a(9) As SingleB、Dim a(3，3) As SingleC、Dim a(-1 To l，-5 To -3) As SingleD、Dim a(-3 To -1，5 To 7) As Integer25、以下程序输出的结果是____________。

Dim aa=Array(1,2,3,4,5,6,7)For i=Lbound(a)To Ubound(a)a(i)= a(i)*a(i)Next iPrint a(i) ( )A、49B、0C、不确定D、程序出错26、下列程序段的输出结果是____________。

Dim i As Integer Dim a(8) As Integer y = 18:i = 0 Do a(i) = y Mod 2 i = i + 1 y = y \ 2 Loop Until y < 1 For j = i - 1 To 0 Step -1 Print a(j); Next j ( )A、1 0 0 0B、1 0 0 1 0C、0 0 1 1 0D、1 0 1 0 027、假如用复制、粘贴的方法建立了一个命令按钮数组Command1，以下对该数组的说法错误的是________。

( )A、命令按钮的所有Caption属性都是Command1B、在代码中访问命令按钮只需使用名称Command1C、命令按钮的大小都相同D、命令按钮共享相同的事件过程28、程序代码如下，当单击窗体上Command1控件时，窗体上显示的结果是_________。

Option Base 1Private Sub Command1_Click( )Dim i As IntegerDim x(3,3)As IntegerFor i = 1 To 3For j = 1 To 3x(i,j) = (i-1) * 3+jNext jNext iFor i = 1 To 3Print x(i,4-i)Next iEnd Sub ( )A、1 5 9B、1 4 7C、3 5 7D、3 6 929、文件号最大可取的值为____________。

( )A、255B、511C、512D、25630、可以在________中，使用语句Public PubStr As String*20定义一个定长字符串。