《vb程序设计》期末复习题及答案

1、vb程序设计期末复习题及答案一、填空题1创建一个vb应用程序三个主要的步骤是_、_和_。2当程序运行时，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的_窗口中，把此文本框的_属性设置成空白。3label和textbox控件用来显示和输入文本，如果仅需要让应用程序在窗体中显示文本信息，可使用_控件；若允许用户输入文本，则应使用_控件。4窗体的常用方法有_、_、_和_。5要想在代码中给名为txtshow的文本框赋予文本：good work ，应当编写的语句是_。6若命令按钮的名称为cmdopen，程序要求单击该命令按钮时，打开一个窗口frm1，请对以下事件过程填空。private sub

2、 cmdopen_ _end sub7visual basic 6种类型的表达式是_、_、_、_、_、_。visual basic根据表达式的_来确定表达式的类型。8表达式93 7 mod 2 2 的值是_。9已知a=3，b=4，c=5，表达式ab and not ca or cb and ca and not b=1.7 and w=62.5 b、t=62.5c、t1.7 and w=1.7 or w a + b or b - 1 c - 1 and c + a a xor b c - 2end sub7#12/31/1999# - #12/20/1999#的运算结果是#12/11/1999

3、#8可以在窗体的通用部分声明静态变量。9使用声明语句建立一个变量后，visual basic会自动对数值类型的变量赋初值0，变长的字符串被初始化为一个零长度的字符串，定长字符串用空格填充，variant变量被初始化为 empty，布尔型的变量被初始化为false。10事件过程通常由事件驱动执行，而sub过程通过过程调用执行。11将焦点主动设置到指定的控件或窗体上应采用setfocus方法。12当图像控件（image）的stretch属性为true时，image控件能自动调整自己的尺寸与显示的图片匹配。四、读程序题，写出程序运行结果。1private sub form_click() for i

4、 = 1 to 9 for j = 1 to 30 - 3 * i print ; next j for k = 1 to i print k; next k for k = i - 1 to 1 step -1 print k; next k print next iend sub2option explicitprivate sub command1_click() static s as integer dim i as integer s = 1 for i = 1 to 5 s = s * i next i print send sub3 for x = 5 to 1 step -1

5、 for y = 1 to 6 - x print tab(y + 5); *; next y printnext x4 private sub form_activate()print aa & bb,-5 * 6,not 2 = 3print aa & bb; -5 * 6; not 2 = 3printprint 30+60,print 30 + 60？30+60; 30 + 60end sub5x=1do while x=10if x mod 7 =0 theny = x + 6elsez = xend ifx = x + 2loopprint x,y,z五、编程题1设计一个计算程序。

6、该程序用户界面如图所示，由四个文本框：文本框1（text1）、文本框2（text2）、文本框3（text3）、文本框4（text4），和三个按钮：命令按钮1（command1）、命令按钮2（command2）、命令按钮3（command4）组成。程序运行后，用户单击清除按钮，则清除文本框中显示的内容。单击计算按钮，如果成绩填写不完全，则给出提示信息，否则计算三科平均成绩。单击退出按钮则退出。2设计程序。要求：从文本框text1中接收输入的数据，当单击确定按钮（command1）时，如果该数据满足条件：除以3余2，除以5余3，除以7余4，则输出；否则将焦点定位在文本框text1中，选中其中的文本

7、。3设计一个欢迎程序。该程序用户界面如图所示。要求程序运行后，用户选中粗体复选框时，标签（label1）中的文字（欢迎您！）的字体变成粗体，用户选中斜体复选框时，标签的字体变成斜体。若取消选中，则恢复原字体。单击结束，则退出。4任意输入3个数，求大小排第二的那个数，写出程序代码。 vb期末复习参考答案一、填空题1创建应用程序界面 设置属性 编写代码2属性、text3label textbox4load方法 show方法 hide方法 unload方法5txtshow.text=good work6click()、frm1.show7算术表达式 字符串表达式 关系表达式 布尔表达式 日期表达式

8、对象表达式 运算符819true false101211sin(x) 2 + sqr(x 2 - y 2) / (2 * x)12dim a(1 to 5，-2 to 6) as string13单击 双击 装载 多 响应某个事件后所执行的程序代码 cmd1 click14完成某种特定的功能 对象名.方法名 form1.show15autosize stretch16filecopy c:，d:二、单项选择题1b 2c 3c 4d 5d 6b 7b8d 9d 10c 11d 12a 13c三、指出下列句中的错误，修改或者说明原因。1int.sum 不正确。变量名中不能包括小数点。2变量名的长度

9、最长可达255个字符。3 3.6 ， 4因为a 不是整型变量。4不正确。程序不可以改变字符的长度，这是vb规定。5不完全正确。variant是一种特殊的数据类型，除了定长字符串数据及用户定义类型外，可以包含任何种类型的数据，这是vb规定。6false 。逻辑表达式计算结果。7不正确。两个日期型数据相减，其结果是一个数值型数据。8不正确。静态变量为局部变量，只能在过程中声明。9正确。10正确。11正确。12不正确。该属性设为ture时，image控件不能自动调整自己的尺寸与显示的图片匹配，而可以使图片自动扩展以适应控件的尺寸。四、读程序题，写出程序运行结果。1程序运行后，单击窗体，输出结果为：1

10、1 2 11 2 3 2 11 2 3 4 3 2 11 2 3 4 5 4 3 2 11 2 3 4 5 6 5 4 3 2 11 2 3 4 5 6 7 6 5 4 3 2 11 2 3 4 5 6 7 8 7 6 5 4 3 2 11 2 3 4 5 6 7 8 9 8 7 6 5 4 3 2 12程序运行后，单击按钮command1，输出结果为：120。3. * * * * *4.aabb -30 falseaabb-30 false30+60 9030+60 905. 11 13 9五、编程题1private sub command1_click() text1.text = tex

11、t2.text = text3.text = text4.text = end subprivate sub command2_click() a = trim(text1.text) b = trim(text2.text) c = trim(text3.text) if a = or b = or c = then msgbox 成绩填写不完全！, vbcritical else text4.text = (val(a) + val(b) + val(c) / 3 end ifend subprivate sub command3_click() unload meend sub2priv

12、ate sub command1_click() x = val(text1.text) if x mod 3 = 2 and x mod 5 = 3 and x mod 7 = 4 then print x else text1.setfocus text1.selstart = 0 text1.sellength = len(text1.text) end ifend sub3private sub check1_click() if check1.value = 1 then label1.font.bold = true else label1.font.bold = false en

13、d ifend subprivate sub check2_click() if check2.value = 1 then label1.font.italic = true else label1.font.italic = false end ifend subprivate sub command1_click() unload meend sub4a = val(inputbox(输入第一个数：)b = val(inputbox(输入第二个数：)c = val(inputbox(输入第三个数：)if a b then t = a: a = b: b = tif a c then t

14、= a: a = c: c = tif b c then t = b: b = c: c = tmsgbox (求大小排第二的数是： & b)vb期末考试试题 a卷一、 填空题1、vb程序设计的主要特点是 （1） 和 （2） 。2、在vb中，最主要的两种对象是 （3） 和 （4） 。3、工程是构成应用程序文件的 （5） 。4、方法是vb提供的一种 （6） ，用来完成一定的操作。5、浮点类型数据包括单精度型和_（7）_数据。6、事件是窗体或控件对象识别的_（8）_。7、可用窗体的_（9）_ 方法在窗体中显示文字。8、 复选框控件value属性指示复选框处于_（10）_或禁止状态(暗淡的)中的某一

15、种。9、在vb中，修改窗体的 （11）和 （12） 属性值，可改变窗体的大小。10、双击工具箱中的控件图标，可在窗体的 （13） 出现一个尺寸为缺省值的控件。11、在msgbox函数中，如果缺省title参数，则使用 （14） 作为消息框的标题。12、设x34.58，语句print format(x,“000.0”)的输出结果是 （15） 。13、在vb 中，数值型变量的初值为 （16） ，varant型变量的初值为 （17） ，布尔型变量的初值为 （18） 。14、设置窗体的 （19） 属性，可在窗体上显示图片。15、程序运行工程中，清除mp图片框中的图片应使用语句 （20） 。二、选择题1

16、、菜单控件只包括一个事件，即 （1） ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。a、gotfocus b、load c、click d、keydown2、滚动条控件(如图所示)的max属性所设置的是 （2） 。a、滚动框处于最右位置时，一个滚动条位置的value属性最大设置值b、 单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量c、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量d、滚动条控件无该属性3、sql 语句 select * form student 中的 *表示 （3） 。a、所有记录 b、所有字段 c、所有表 d、

17、都不对4、以下选项中，不属于标签的属性是 （4） 。a、enabled b、caption c、default d、font5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 （5） 。 a、caption b、name c、text d、label6、设置一个单选按钮(optionbutton)所代表选项的选中状态，应当在属性窗口中改变的属性是 （6） 。 a、caption b、name c、text d、value 7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？ （7） 。 a、在标题项中输入&，然后打勾 b、在索引项中打勾 c、在有效项中打勾 d、在复选项中打勾 8

18、、当执行以下过程时，在窗体上将显示 （8） 。private sub command1_click( )print vb;print hello! ;print vbend suba、 vbhello!vb b、 vb hello!vb c、 vb d、 vb hello! vb hello! vb9、语句print the answer is:;20/4-2的结果为 （9） 。a、the answer is 20/4-2 b、the answer is 3c、the answer is 20/4-2 d、非法语句 10、下列哪个控件是容器控件 （10） 。 a、image b、picture

19、 c、combobox d、filelistbox 11、若要将窗体从内存中卸载出去，其实现的方法是 （11） 。a.show b.hide c.load d.unload12、以下选项中，不是 visual basic控件的是 （12） 。 a.窗体 b.定时器 c.单选框 d.命令按钮13、双击窗体中的对象后，visual basic将显示的窗口是 （13） 。 a.代码窗口 b工具箱 c项目（工程）窗口 d属性窗口14、可决定窗体的左上角是否有控制菜单的属性是 （14） 。a.controlbox b.minbutton c.maxbutton d.borderstyle15、设有如下语

20、句： strlinputbox（输人，练习）从键盘上输人字符 “示例”后，strl的值是 （15） 。 a“输入” b“ ” c“练习” d“示例” 16、窗体form1的name属性是frm1,它的单击事件过程名是 （16） 。 a. form1_click b.form_click c. frm1_click d. me_click 17、窗体的hide属性的含义是 （17） 。 a.隐藏 b.展现 c.装入 d.卸载18、若要设置定时器控件的定时时间，需设置的属性是 （18） 。aenabled bvalue cinterval dtext19、能够改变复选框中背景颜色的属性是 （19）

21、 。 avalue bfontcolor cbackcolor dfont20、窗体能响应的事件是 （20） 。 aactiveform bload cdrive dchange三、判断题(判断下列正确与否，正确的打，错误的打。)1、三种方式的组合框都允许用户输入哪些不在列表框中的选项。2、图象框中的stretch属性为true时，其作用是图形自动调整大小以适应图象控件。3、在菜单编辑器中使用“索引”时，可有一组菜单项具有相同的“名字”。4、通过改变属性窗口中的name属性，来改变窗体的标题。5、创建vb应用程序的三个主要步骤是：(1)创建应用程序界面(2)设置控件(3)编写代码。6、变量是指

22、在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。7、已知pmsgbox(“howareyou?，vbyesno+vbquestion，“hello!”)，变量p是integer数据类型。8、工程文件的扩展名是 .vbg 。9、vb允许设计和使用用户自己设计的控件。10、optionbutton控件没有dblcliek事件。11、同一条记录中的各数据具有相同的类型。12、使用data控件可以直接显示数据库中的数据。13、imagelist 是一个图像容器控件，可用作工具栏的图像库。14、当用户单击工具栏按钮时，将触发工具栏按钮的buttonclick事件。15、在vb的工程资源管理器

23、中，如果从工程中移除已经保存过的文件，该文件仍然被物理删除（真正删除）。16、如果列表框的listconut的属性为10，则列表框最后一项的listindex值为10。17、要是某个命令按钮不起作用，应将该按钮的enabeld属性设置为false。18、使用数组定义语句：dim d$（10），则数组d中各元素的值为空。19、如果在一行中输入多条语句，各语句之间用使用 ；分隔。20、在代码窗口中输入某行代码并按回车键之后，如果代码变成红色，说明该行代码有语法错误。 四、读程序题，写出程序运行结果 1、 private sub form_click()static sum as integeri

24、= 1do while i=10sum = sum + ii = i + 1loopprint sumend sub 运行程序，第一次单击窗体： 第二次单击窗体： 2、 private sub form_click()print *; tab(6); 2, tab(15); 5printfor i = 15 to 16print i;for j = 2 to 6 step 3 print tab(3 * j); j * i;next jprintnext iend sub 程序运行结果： 五、编程题（一）窗体中有图片框(picture1)和计时器(timer1)两个控件，运行程序时，将图片加载

25、到图片框中，然后图片框以每2秒钟一次的速度向窗体的右下脚移动，每次向左、向右移动100twip（20分之一像素）。请填空： private sub form_load( ) （1） =loadpicture(“c:picball.ico”) （2） .interval=200 end sub private sub timer1_timer( ) static x , y as integer x=x+100 y=y+100 picture1.move （3） end sub （二）有一个单击按钮过程，其作用是产生50个60100的随机数，统计其中被6整除余2的个数，并将这些数输出。请填空：

26、private sub command1_click() dim x as integer, n% dim counter as integer (1) timer for n=1 to 50 x=rnd()* (2) if (3) =2 then print x counter= (4) (5) next n print counter end subvb程序设计与应用参考答案一、填空题12345答案可视化设计事件驱动编程窗体（form）控件集合题号678910答案特殊子程序双精度动作print选中题号1112131415答案高度（height）宽度(width)中央工程134.6题号161

27、7181920答案0空falsepicturecls二、选择题12345答案cabca题号678910答案ddabb题号1112131415答案daaad题号1617181920答案caccb三、判断题12345678910答案11121314151617181920答案四、程序阅读题：（一） （10分） 1 、 55 2、 110 （二）、 （10分） * 2 515 30 75 16 32 80五、编程题 （20分）（一）1、picture1.picture 2、 timer1 3、 x ,y (二) 1、 randomize 2、 rnd()*41+60 3、 x mod 6 4、 co

28、unter1 5 end if 一、单项选择题（共10分）1在代码中引用一个控件时，应使用控件的（b）属性。 acaption bname ctext dindex2设变量x = 4，y = -1，a = 7，b = -8,下面表达式（a）的值为“假”。 ax+a 0 and y y d x+y a+b and not (y b = c and a = d的值为false 。三、将下列数学表达式转换为vb表达式。（6分）1a2+2ab+b2 ： a2+2*a*b+b228exln10 ：8*exp(x)*log(10) 32sin(450)cos(450) ：2*sin(3.1416/4)*c

29、os(3.1416/4)6在vb中，用户定义常量使用 const 语句，声明变量使用 dim语句。1在vb 6.0中，扩展名为.vbp的文件称为 a 。a) 工程文件b) 窗体文件c) 类模块文件d) 标准模块文件2在vb 6.0集成开发环境的设计模式下，用鼠标双击窗体上的某个对象后，打开的窗口是 a 。a) 代码窗口b) 窗体设计窗口c) 属性窗口d) 工程资源管理器窗口3设有变量定义语句dim a%，则变量a的数据类型是 a 。 a) 整型b) 单精度类型c) 双精度类型d) 字符串类型4下列表达式中，值为false的是 d 。a) ababcb) abc = ucase(abc)c) a

30、bcdabcd) mid(abcd,3,1)=left(abcd,3)5函数instr(abcdef, cd)的值是 b 。a) 2b) 3c) true d) cdef 6下列程序运行后，单击窗体，输出结果是 c 。private sub form_click()dim a as integer, b as integera = 3b = 5print a + b; a & bend suba) 8 8b) 35 35c) 8 35d) 35 87下列程序运行后，单击窗体，输出结果是 b 。private sub form_click() a = 3: b = 7 a = a + b : b

31、 = a b : a = a - b print a; bend suba) 4 3b) 7 3c) 3 7d) 10 7 8下面程序段所表示的数学关系式是 c 。if (a b) then if d = c then x = 1 else x = 2 end ifa) b) c) d) 9下列程序运行后，单击窗体，输出结果是 c 。private sub form_click() s = 0: k = 1 do s = s + k: k = k + 1 loop until k = 5 print send suba) 15b) 10c) 1d) 010下列程序段的输出结果是 b 。for

32、k = 4 to 2 step -2 m = k next k print m; k;a) 2 2b) 2 0c) 2 1d) 0 0 11用下面的语句定义数组，则数组中的元素个数是 d 个。option base 1 dim a(-1 to 2，5) as integera) 5b) 10c) 15d) 2012下面程序段的输出结果是 c 。dim a(4) as integer, s as integerfor k = 1 to 4 a(k) = 2 * knext k for k = 1 to 4 step 2 s = s + a(k) print s; next ka) 8b) 20c

33、) 2 8d) 2 6 12 2013设有如下的用户自定义类型private type stu name as string * 10 age as integerend type则以下正确引用该类型成员的代码是 b 。a) s=zhangb) dim s as stu = zhangc) dim s as type stu = zhangd) dim s as type = zhang14用“ b ”关键字声明的变量称为全局变量。a) privateb) publicc) dimd) static15在窗体上放置一个文本框，程序运行后，

34、在文本框中输入abc，但显示的却是*，可能的原因是该文本框的 d 属性值已经被设置为*。a) fontb) textc) named) passwordchar16在vb 6.0中，print是对象的 b 。a) 属性b) 方法c) 事件d) 名称17在vb 6.0中，要判断复选框是否为选中状态，使用的属性是 d 。 a) captionb) checkedc) selectedd) value18设列表框list1中共有3个列表项，如右图所示。则下列语句中，能够删除最后一个列表项的是 a 。a) list1.removeitem 2b) list1.removeitem 项目cc) list

35、1.removeitem list1. listcountd) list1.removeitem list1. listindex19组合框分为下拉式组合框、简单组合框和下拉式列表框，在“属性”窗口中这三种类型是由 a 属性设置的。a) styleb) fillstylec) backstyled) borderstyle20用户单击滚动条的空白处（滑块与两端滚动箭头之间的区域）时，value属性所增加或减少的值，是由 d 属性决定的。a) minb) maxc) smallchanged) largechange21将图片文件“b.jpg”作为背景图片，装入当前窗体，正确的语句是 d 。a)

36、 me.picture=b.jpgb) me.picture= loadpicture(b.jpg)c) me.picture=b.jpgd) me.picture= loadpicture(b.jpg)22要将两个单选按钮放置在同一个框架内，使它们成为一组，正确的操作是 a 。a) 先放置一个框架，然后在框架中放置两个单选按钮b) 先放置两个单选按钮，再放置一个框架，放置框架时覆盖在单选按钮上c) 先放置两个单选按钮，再放置一个框架，然后将两个单选按钮拖动到框架内d) 以上三种方法都正确23计时器控件能够响应的事件是 d 。a) loadb) clickc) changed) timer24要使命令按钮处于无效状态