2022年VB程序设计练习题附加答案

1、vb程序设计综合复习资料第一章visual basic程序设计概述一、填空题1、 visual basic 是一种面向_对象 _的可视化程序设计语言，采取了事件驱动_的编程机制。2、在 vb 中工程文件的扩展名是vbp_，窗体文件的扩展名是_frm_ ，标准模块文件的扩展名是_bas_。3、执行“工程”菜单下的_部件 _命令，可选择并添加activex 控件。4、 visual basic 6.0 用于开发 _ windows _ 环境下的应用程序。二、选择题1、下面不是vb 工作模式的是（c）a设计模式b运行模式c汇编模式d中断模式2、可视化编程的最大优点是（c）a具有标准工具箱b一个工程文

2、件由若干个窗体文件组成c不需要编写大量代码来描述图形对象d所见即所得3、下列不能打开属性窗口的操作是（c ）a执行“视图”菜单中的“属性窗口”命令b按 f4 键c按 ctrl+t d单击工具栏上的“属性窗口”按钮4、下列可以打开立即窗口的操作是（d）actrl+d bctrl+e cctrl+f dctrl+g 5、 visual basic 的编程机制是（d）a可视化b面向对象c面向图形d事件驱动三、简答题精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 1 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - -

3、- - - - - - - - - - - - 第 1 页，共 31 页 - - - - - - - - -1、代码窗口主要包括哪几部分？2、在工程资源管理器窗口中，主要列出了哪三类文件？3、窗体布局窗口的主要用途是什么？4、 vb 的基本特点是什么？5、怎样理解可视化设计？6、怎要理解事件驱动编程？第二章简单的 vb 程序设计一、填空题1、设置是否可以用tab 键来选取命令按钮，应该用_ tabstop _属性。2、 一个控件在窗体的位置由_和_属性决定，其大小由 _和_属性决定。3、 利用对象的属性setfocus 可获得焦点， 对于一个对象， 只有其 visible 属性和 _属性为 t

4、rue，才能接受焦点。4、设置控件背景颜色的属性名称是_。5、所有控件都具有的共同属性是_属性。6、一般情况下，控件有两个属性项的缺省值是相同的，这两个属性项是_。7、 vb 中的每个对象（控件）都有一组特征，这组特征称为_，我们通过修改它可以控制对象的外观和操作。8、通常情况下，vb中一个工程主要包括如下四个文件：窗体文件、工程文件、类模块文件和 _文件，后者的扩展名为.bas，通常由basic 语言编写，是一个可共用的子程序。9、vb 有三种工作模式，分别是设计（design）模式、 _和中断 （ break）模式。二、选择题1、以下能够触发文本框change 事件的操作是（c）a文本框失

5、去焦点b文本框获得焦点c设置文本框的焦点d改变文本框的内容2、应用程序设计完成后，应将程序保存，保存的过程是（d ）精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 2 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 2 页，共 31 页 - - - - - - - - -a只保存窗体文件即可b只保存工程文件即可c先保存工程文件，之后保存窗体文件d先保存窗体文件（或标准模块文件），之后还要保存工程文件3、 vb 应用程序的运行模式是（c）a解释运行模式b编译

6、运行模式c两者都有d汇编模式4、任何控件都具有的属性是（a ）atext bcaption cname dforecolor 5、决定控件上文字的字体、字形、大小及效果的属性是（d）atext bcaption cname dfont 6、在窗体上建立了多个控件，如text 、label1 、command1，若要使程序一运行焦点就定位在command1控件上，应将command1控件的（ b ）设置为0 aindex btabindex ctabstop denabled 7、运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的text 属性进行赋值从而改变了文本框的text 属性值

7、时，将触发文本框的（a）事件aclick bdblclick cgotfocus dchange 8、在运行时， 按 tab 键跳过了一个可以获得焦点的控件（如文本框），则可能是因为 （b ）a该控件的tabstop 属性值为 true b该控件的tabindex属性值为false c该控件的enabled属性值为true d该控件的enabled属性值为false 9、为了防止用户随意将光标置于控件上，应（a ）a将控件的tabindex属性设置为0 b将控件的tabstop 属性设置为true c将控件的tabstop 属性设置为false d将控件的enabled属性设置为false 1

8、0、若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（d）属性abackcolor bborderstyle cforecolor dbackstyle 精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 3 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 3 页，共 31 页 - - - - - - - - -11、如果要在文本框中输入字符时，只显示某个字符，如星号（*） ，运行时，在文本框中输入的字符仍然显示出来，而不显示星号，原因可能是（b ）a

9、文本框的multiline属性值为true b文本框的locked 属性值为true c文本框的multiline属性值为false d文本框的locked 属性为 false 12、在运行阶段，要在文本框text1 获得焦点时选中文本框中所有内容，对应的事件过程是（ b ）aprivate sub text1_gotfocus( ) text1.selstart=0 text1.sellength=len(text1.text) end sub bprivate sub text1_lostfocus( ) text1.selstart=0 text1.sellength=len(text1

10、.text) end sub cprivate sub text1_change( ) text1.selstart=0 text1.sellength=len(text1.text) end sub dprivate sub text1_setfocus( ) text1.selstart=0 text1.sellength=len(text1.text) end sub 13、visual basic 继承了 basic 语言简单易用的语法特点，同时支持面向对象的编程机制，其中构成其控件（对象）的三要素是（d ）a属性、事件、事件过程b控件、窗体、事件c属性、过程、方法d属性、事件、方法1

11、4、决定标签（label）显示的属性是（c ）atext bname ccaption dalignment 15、命令按钮的标题文字由（b）属性来设置。atext bcaption cname d (名称 ) 16、若要设置文本的显示颜色，则可用（a ）属性来实现。精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 4 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 4 页，共 31 页 - - - - - - - - -abackcolor bforeco

12、lor cfillcolor dbackstyle 17、在运行时，若要调用某命令钮的click 事件过程，则可设置该命令钮对象的（）属性为 ture 来实现。aenabled bvalue cdefault dcancel 18、在运行时，若要获得用户在文本框中所选择的文本，可通过访问（）属性来实现。aselstart bsellenght ctext dseltext 三、简答题1、事件驱动的含意是什么？举例说明。2、交互式开发方法和传统的应用程序开发过程有什么不同？3、文本框在什么情况下使用？4、什么是工程？5、结构化程序设计的三种基本结构是什么？6、对象的三要素是什么？并分别进行简单的

13、解释。7、为什么要生成可执行文件和制作安装盘？8、使用变量前先声明有什么好处？9、如何使用帮助功能？10、结构化程序设计的特点是什么？11、为了把焦点移到某个指定的控件，在代码中应使用的方法是什么？12、启动 visua basic 后，只创建了一个窗体，若此时保存，需要保存几个文件？各是什么文件？先保存的是哪一个？13、为了防止文本框中的信息运行后被用户修改，应设置什么属性？第三章 vb 基本语言一、填空题1、一般可以使用_关键字声明常量。2、 _类型也称变体类型，是一种通用的、可变的数据类型，它可表示或存储任何一种数据类型。3、变量的声明分为两种方法：_和_。精品学习资料 可选择p d f

14、 - - - - - - - - - - - - - - 第 5 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 5 页，共 31 页 - - - - - - - - -4 、 在vb中 ， 用 _ 语 句 设 定 数 组 的 下 界 ， 用 _ 和_语句分别返回数组的上、下界。5、在代码模块中加入option explicit的目的是 _。6、 function aa (a1 as date,optional a2 as boolean) as single，写出optional 命令的作用_。7

15、、在 vb 中，我们用一个简单的_语句就能实现退出程序。8、生成消息框的命令是_，生成输入框的命令是_。9、通用对话框（commondialog ）属 activex 控件，它可以显示多个标准对话框，包括打开/另存为、字体、打印等对话框，若要显示所有文件，则应设置其属性filter=_ ，若要使它显示为打印对话框，则应使用什么方法_。10、从字符串中任意位置截取字符的函数是_。11、语句 for j = 3 to 20 step 3 使循环体执行了_次。12、对于正在使用的动态数组arraya() ，要增加一个单元，但不能破坏数组内的数据，则应使用语句 _。13、在 visual basic

16、中声明静态变量的关键字是_。14、表达式10 mod 6 4 的值为 _。15、表达式chr(asc(a) + 5) 的值为 _。16、vb 中使用注释有2 种方法，即 _和_。17、vb 中的数据以四种形式存储：常量、_、_和记录。18、为了在 vb 中存储一个4行 5 列的二维矩阵，需要定义一个整型的数组，请把数组定义语句补充完整：dim juzhen(_ _) as integer。19、控件数组由一组相同类型的控件组成，这些控件共用一个相同的控件名，但是每个控件都有一个唯一的下标来区分，我们使用属性_ _来设置下标。20、在过程调用中，实现调用过程的实参和被调用过程的形参之间的数据传递

17、有两种方式：按值传递和 _ _。21、 为 了 保 证 程 序 中 必 须 对 变 量 的 强 制 性 定 义 ， 需 要 在 代 码 模 块 的 声 明 部 分 加 入_语句。精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 6 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 6 页，共 31 页 - - - - - - - - -22、分析 for nex t 循环结构的实例：for i = 5 to 30 step 2 中，循环体一共执行了_次。23、

18、表达式mid(universityofpetroleum, 8, 4) 的值为 _。24、常量分为普通常量和_常量。25、要将大写字母转换为小写字母，可使用_函数。26、不管焦点在哪个控件上，按_键相当于按了取消按钮。27、执行“工程”菜单下的_命令，可选择并添加activex 控件。28、_是程序中vb 停止执行的地方。29、逻辑常量为true 或_。30、使用了 _的声明后， 当程序中使用未经声明的变量时，程序运行时会报错。31、要将小写字母转换为大写字母，可使用_函数。32、自字符串n1 位开始向右取n2 个字符，要使用_函数。33、日期常量表示时，用符号_将日期型数据括起来。34、局部

19、变量只能在_中声明和使用。35、模块级变量的声明关键字是dim 或 _。36、函数 abs(x) 的功能是 _。37、表达式3/6*5 的值是 _。二、选择题1、以下哪个是合法的变量（）aright babc123 c123_abc d ab123c 2、下列说法错误的是（）a在同一模块不同过程中的变量可以同名b不同模块中定义的全局变量不可以同名c引用另一模块中的全局变量时，必须在变量名前加模块名d同一模块中不同级的变量可以同名3、把 msgbox 的返回值转换为数值应该使用的函数是（）精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 7 页，共 31

20、 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 7 页，共 31 页 - - - - - - - - -alog bstr clen dval 4、语句 dim aa(3,4,5) 中定义的数组有（）个元素a12 b60 c120 d345 5、下面程序运行后输出的结果是（）a$=china b$=string$(3,a$) print b$ end achi bccc cina daaa 6、以下语句的输出结果是（）print format$(32548.5, 000,000.00) a32548.5 b32

21、5,485.00 c032,548,50 d32,548,50 7、以下叙述中错误的是（）a如果过程被定义为static 类型，则该过程中的局部变量都是static 类型bsub 过程中不能嵌套定义sub 过程csub 过程中可以嵌套调用sub 过程d事件过程可以像通用过程一样由用户定义过程名8、 visual basic 提供的 on error resume next 错误陷阱语句表示（）a当发生错误时，使程序转跳到语句标号为0 的程序块b当发生错误时，不使用错误处理程序块c当发生错误时，忽略错误行，继续执行下一语句d当发生错误时，终止本过程执行，继续执行下一过程9、在 visual ba

22、sic 中，若要将控制权交给操作系统则通过（）的语句。aend bexit do cexit sub ddoevents 10、在 visual basic 中语句的续行号采用（）a空格与下划线b下划线与空格c空格与短线d短线与空格11、假定有以下程序段：精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 8 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 8 页，共 31 页 - - - - - - - - -for i=1 to 3 for j=5 to

23、1 step 1 print i*j next j,i 则语句 print i*j 的执行次数是（）a15 b.16 c17 d18 12、从键盘上输入两个字符串，分别保存在变量str1、str2 中。确定第二个字符串在第一个字符串中起始位置的函数是（）aleft bmid c string dinstr 13、如果将布尔常量值true 赋值给一个整型变量，则整型变量的值为（）a0 b-1 ctrue dfalse 14、下列叙述不正确的是（）a注释语句是非执行语句，仅对程序的内容起注释作用，它不被解释和编译b注释语句可以放在代码中的任何位置c注释语句不能放在续行符的后面d代码中加入注释语句的

24、目的是提高程序的可读性15、语句 print “ int (-13.2)” ；int(-13.2) 的输出结果为（）aint(-13.2)= -13.2 bint(-13.2)= 13.2 cint(-13.2)= -13 dint(-13.2)= -14 16、如果 tab 函数的参数小于1，则打印位置在第（）列a0 b1 c2 d3 17、变量未赋值时，数值型变量的值为（）a、0 b空c1 d无任何值18、下列语句中正确的是（）atxt1.text+txt2.text=txt3.text b=cmdok c12label.caption=1234 da=input

25、box(“ hello”)19、假设变量boolvar 是一个布尔型变量，则下面正确的赋值语句是（）精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 9 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 9 页，共 31 页 - - - - - - - - -aboolv ar= true bboolvar=.true cboolv ar=#true# dboolvar=320 判断循环结构的类型和循环体的执行次数，正确的选项是（）a当型循环，20 次b直到型

26、循环，10 次c当型循环， 10 次d直到型循环，20 次精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 11 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 11 页，共 31 页 - - - - - - - - -26、在程序中，使用inputbox 函数可以接受用户的输入，如果要把它的返回值转换为数值型的数据，应该使用的函数是（）aval blen cstr dlog 27、动态数组因为在程序运行前无法确定数组的大小，所以经常根据程序的运行情况，对数

27、组进行重新定义，以下关于vb 中动态数组的叙述中不正确的是（）a可以用redim 语句重新定义动态数组，并且可以进行多次重定义b首次用 dim 进行动态数组声明的时候，必须指明它的类型和上下界cpreserve为 redim 语句的可选参数，用于保留动态数组原来的内容d当对动态数组使用erase语句进行释放操作时，将释放其内存28、vb 中的控件也叫做部件或组件，主要包括三类， 以下哪一项不属于vb 控件的分类 （ ）a控件b可插入对象cado 控件dactivex 控件29、表达式4+5 6 * 7 / 8 mod 9 的值是（）a4 b5 c6 d7 30、可以同时删除字符串前导和尾部空白

28、的函数是（）altrim brtrim ctrim dmid 三、简答题1、全局变量声明有哪些限制？2、字符串是否可以自动转换为数字类型？3、用 format 函数格式化后的字符格式在不同区域环境下的输出是否相同？为什么？4、在 inputbox 函数中，哪一个参数是必需的？5、在 msgbox 函数中哪一个参数是必须的？6、在什么情况下使用过程？7、为什么要进行程序调试？8、调试程序有哪些手段？9、用语句dim a(-3 to 5) as integer定义的数组的元素个数是多少？10、设有如下的visual basic 表达式： 5*x2-3*x-2*sin(a)/3，与它对应的数学式是什

29、么？精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 12 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 12 页，共 31 页 - - - - - - - - -11、数学式)3)(2(byax对应的 vb 表达式是什么？12、表达式23 and 44 的值是什么？13、怎样在程序中设置断点？14、在什么情况下可以设置断点？15、程序出错的类型有哪几种？16、在同一模块、不同过程中声明的相同变量名，两者是否表示同一个变量？为什么？17、什么情况下会出现“

30、数组下标越界错误”？18、逐语句和逐过程有什么区别？19、表达式2.75 * 2 3.45 的值是什么？20、在程序设计中为什么尽量不用goto 语句？四、读程序题1、分析以下程序，写出运行结果。private sub form_click() score = int(rnd * 10) + 80 select case score case is 60 a$ = f case 60 to 69 a$ = d case 70 to 79 a$ = c case 80 to 89 a$ = b case else a$ = a end select print a$ 精品学习资料 可选择p d

31、f - - - - - - - - - - - - - - 第 13 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 13 页，共 31 页 - - - - - - - - -end sub 2、读下面的程序，分析其功能，写出运行结果。在窗体上有一个命令按钮，名称为command1。然后编写如下程序：private sub command1_click() for i = 1 to 4 for j = 0 to i print chr$(65 + i); next j print next i en

32、d sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是什么？3、阅读下面的程序，分析并写出其功能。sub insert(a() as single,byval x as single) dim m as integer,n as integer n=1 do while na(n) n=n+1 loop for m=20-1 to n step 1 a(m+1)=a(m) next m a(n)=x end sub 4、分析以下程序，写出运行结果。sub subp(b() as integer) for i =1 to 4 精品学习资料 可选择p d f - - - - - - -

33、- - - - - - - 第 14 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 14 页，共 31 页 - - - - - - - - -b(i)=2*i next i end sub private sub commandl_click() dim a(1 to 4)as integer a (1)=5 a (2)=6 a (3)=7 a (4)=8 subp a() for i =1 to 4 print a(i) next i end sub 运行上面的程序，单击命令按钮，输出结果是什么

34、？5、分析以下程序，写出运行结果。sub sele() dim n as integer i=21:n=3 do while in i=i n loop print i end sub 6、分析以下程序，写出运行结果。sub selectprint() 精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 15 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 15 页，共 31 页 - - - - - - - - -dim a as integer dim b

35、as integer dim c as integer a=2:b=5:c=2 if(a=b)and(a=c) or (bc) then print a a=a+2 else print b endif print a;b;c end sub 7、分析以下程序，写出运行结果。sub swap() dim x as integer dim y as integer dim z as integer x=1:y=2:z=0 print x;y;z x=x+y x=x*z print x,y,z end sub 8、分析以下程序，写出运行结果。sub selectprint() dim a as i

36、nteger dim b as integer 精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 16 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 16 页，共 31 页 - - - - - - - - -dim c as integer a=3:b=3:c=2 if(a=b)and(ac)then print a print a,b,c end sub 五、编程题1、输入一年号，判断它是否是闰年。界面如下图所示，包括两个标签、一个文本框和一个命令按钮。

37、 提示 ：如果此年号能被400 整除或者不能被400 除尽，也不能被100 除尽，但能被4 整除，则它是闰年；否则，不是闰年。2、输入两个正整数m、n，求 m 和 n 的最大公约数。要求建立如下图所示的窗体，其中主要的控件包括： 两个标签（lable1、 lable2） 、 两个文本框 （text1、 text2） 和一个按钮 （command1） 。3、输入某学生成绩（百分制），若是 100成绩 90 输出优秀；若是90成绩 80 输出良好；若是80成绩 70 输出中等；若是70成绩 60 输出及格；若是60成绩 0，输出不及格；若是其他数则输出error 信息。4、在窗体中显示从9 号字型

38、到16 号字型。5、在有序序列中插入一个数，使插入后的数列仍然有序（设按由小到大排列）。6、编程实现二维数组转置。7、随机输入10 个 100 以内的整型数，计算其和及平均值。8、找出所有的水仙花数。水仙花数是个三位数，它的各位数字的立方和等于这个三位数本身。例如37133+73+13，则 371 是水仙花数。9、从键盘输入一个大于2 的正整数，判断该数是否是素数。10、求二维数组中的最小值及其所在行号、列号。11、求一元二次方程ax2+bx+c=0 的根（包括实根和复根）。精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 17 页，共 31 页 -

39、- - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 17 页，共 31 页 - - - - - - - - -12、输入一个正整数n，计算出n!并输出。13、faibonacci 数列为 0，1，1，2，3，5，8，13 ，计算并输出第20 项以及前20 项的和。第四章 常用控件与窗体一、填空题1、向列表框控件添加新项目的方法是_。2、在 vb 中，最主要的两种对象是_和 _。3、当窗体启动时可通过_属性控制窗体位于所有者的中心位置。4、若要将窗体form1 隐藏起来，则可通过执行代码_来实现。5、要使装入到列表框中的数据项

40、能自动按字母顺序排序，应设置该控件的_属性为_。6、 窗体上放置了若干个文本框和命令按钮，当窗体装入后， 要将焦点自动定位到文本框text1上，则在设计时需要将_控件的 _属性设置为 _。7、在标签控件中通过编程使文字换行用的代码是_。8、设置计时器控件只能触发_事件。9、设置计时器对象触发事件的时间间隔用_属性。10、滚动条控件主要支持两个事件，它们是_事件。11、要使鼠标停留在按钮上显示特殊的鼠标形状，应设置的属性值是_。12、设某列表框共有10 项，按题目要求补齐程序，完成相应的功能。（1）按下命令按钮command1 时将列表框第8 项的内容显示在窗体上：private sub com

41、mand1_click( ) list._(7)=true print list1._ end sub （2）单击列表框某一项时立即将该项打印在窗体上：private sub list1_click( ) print_ end sub 精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 18 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 18 页，共 31 页 - - - - - - - - -（3）按下命令按钮command1 时在窗体上删除第1、3、5、

42、 7、9 项：private sub command1_click( ) for i=1 to 5 list1._ next i end sub （4）在列表框的每一项之后插入一个新的项：private sub command1_click( ) for i=1 to 10 x=inputbox(“请输入插入的第” & i & “ 项内容 ” ) list1.additem_ next i end sub 13、设在界面上放置了一个滚动条hscroll1 和一个标签控件label1，要使每次单击滚动条两端箭头时，或单击滚动条滑块与两端箭头之间的空白区域时，标签内容能够反映滚动条

43、的值，补齐以下代码。private sub hscroll1._( ) label1.caption = hscroll1._ end sub 要使拖动滚动条滑块时标签内容能够反映滚动条的值，补齐以下代码。private sub hscroll1._( ) label1.caption = hscroll1._ end sub 14、列表框（ listbox ）用于列出可供选择的项目的列表，用户可以选择一个或多个项目。它具有几个非常重要的数组属性，其中_ _属性存放了列表框中所有项目的值。15、菜单项一般由标题、访问键、快捷键和复选标志等构成，通过对相应的属性进行设置可以改变这些项目的状态，其

44、中与复选标志相对应的属性是_ _。精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 19 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 19 页，共 31 页 - - - - - - - - -16、 keydown与keypress 事件各有其参数，若需获得用户按下a 还是a 需用_事件。17、 控件 _组合了文本框和列表框的功能，是 vb 中一种功能非常强大的选择类控件。18、若需要将窗体form2 以模态窗口的形式显示出来，可通过执行代码_来实现。1

45、9、菜单中的分隔条是一种菜单控件，不响应_事件，不能被选中。二、选择题1、当程序运行时，在窗体上单击鼠标，以下哪个事件是窗体不会接收到( ) amousedown bmouseup cload dclick 2、窗体 form1 的 name 属性是 frm1，它的单击事件过程名是（）aform1_click bform_click cfrm1_click dme_click 3、用于设置通用对话框控件显示文件类型的属性是（）afilter bpath cpartern dfolename 4、用于从内存删除窗体的命令是（）amove bhide cunload ddelete 5、用于返回窗

46、体可用区域宽度的属性是（）ascalewidth bscaleleft c scaleheight dscaletop 6、下列关于属性设置的叙述错误的是：（ ）a一个控件具有什么属性是vb 预先设计好的，用户不能改变b一个控件具有什么属性是vb 预先设计好的，用户可以改变c一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置d一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值7、下列说法正确的是（）a对象属性只能在“属性窗口”中设置b一个新的工程可以在“工程窗口”中建立c必须先建立一个工程，才能开始设计应用程序d只能在“代码窗口”中编写程序代码精品学习资料 可选择p d f

47、 - - - - - - - - - - - - - - 第 20 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 20 页，共 31 页 - - - - - - - - -8、下列关于窗体上控件的基本操作错误的是（）a按下一次del 键只能删除一个控件b按下一次del 键可以同时删除多个控件c按住 shift 键，然后单击每个要选择的控件，可以同时选中多个控件d按住 alt 键，然后单击每个要选择的控件，可以同时选中多个控件9、下列关于设置控件属性的叙述正确的是（）a用户必须设置属性值b所有的属性

48、值都可以由用户随意设定c属性值不必一一重新设置d不同控件的属性项都完全一样10、不可以通过下列（）操作将焦点赋给对象a运行时使用tab 键b在代码中用call 语句调用c在代码中用setfocus 方法d用访问键或用鼠标单击选择对象11、要在 form_load事件过程中使用print 方法在窗体上输出一定的内容，应（）a设置窗体的visible属性b设置窗体的caption c调用窗体的show 方法d设置窗体enabled属性12、下面（）对象无 caption 属性aform bcommandbutton c textbox dlabel 13、通用对话框控件和文件列表框控件中，都能根据

49、文件的类型对要显示的文件进行筛选过滤，后者使用（）属性进行该项设置。apattern bpath cfilter dfilename 14、对于复选框控件chkboy ，如果在程序中设置它为选中状态，下面语句正确的是（）achkboy.checked = true bchkboy.value = true cchkboy.selected = true dchkboy.value = 1 15、计时器（ timer）控件用于每隔一段时间自动触发一次timer 事件，可以有规律地重复执行一段程序，它用于设置两次事件时间间隔的属性是（）ainterval bsmallchange 精品学习资料 可

50、选择p d f - - - - - - - - - - - - - - 第 21 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 21 页，共 31 页 - - - - - - - - -clargechange dmax 16、以下关于vb 中窗体（ form）的说法中，不正确的描述为（）a执行 unload form 语句后，窗体form 消失，但仍在内存中b当窗体的enabled 属性为 false 时，通过鼠标和键盘对窗体的操作都被禁止c窗体的 height、width 属性用于设置窗体的高

51、和宽d窗体的load 事件在加载窗体时发生17、关于滚动条控件，下面说法错误的是（）a点击滚动条的箭头，可以改变它的value 值，从而引发change 事件b拖动滚动框，可以触发scroll 事件c通常，水平滚动条的值从左向右递增，垂直滚动条的值自上而下递增d拖动滚动框，可以触发change 事件，而且是连续触发的18、在窗体上放置一个命令按钮，名称为 command1。 单击命令按钮时，执行如下事件过程：private sub command1_c1ick() a$=software and hardware b$right(a$,8) c$=mid(a$,1,8) msgbox a$,b

52、$,c$,1 end sub 则在弹出的信息框的标题栏中显示的信息是（）asoftware and hardware bsoftware chardwafe d出现错误19、在多重窗体程序设计中，关键的问题是要解决不同窗体之间的衔接和窗体的显示、关闭等问题，以下关于窗体的相关语句和方法的叙述中，错误的是（）aload 语句用于加载指定窗体，即在内存中创建该窗体bshow 方法兼具load 语句的功能，可以将窗体显示出来chide 方法用于将窗体隐藏起来dunload 语句用来释放窗体，但窗体并没从内存中消精品学习资料 可选择p d f - - - - - - - - - - - - - - 第

53、 22 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 22 页，共 31 页 - - - - - - - - -20、滚动条控件的属性中，表示取值范围最大值的属性是（）amax blargechange cmin dvalue 21、程序中如果需要检测和控制鼠标的位置和状态的改变，就需要使用鼠标事件，其中下面哪个选项用于表示拖动事件（）adragdrop bmousedown cmouseup dmousemove 22、为了使用通用对话框进行打开文件的操作，应将通用对话框的action 属性设定

54、为（） 。a0 b1 c2 d3 三、简答题1、什么是单选按钮？什么是复选框？在使用上有什么不同？2、滚动条的change事件和 scroll 事件有什么不同？3、快捷键和访问键有什么区别？4、在程序运行期间，如果拖动滚动条上的滚动块（即滑块），则触发滚动条的什么事件？5、假定有一个菜单项，名为menuitem，为了在运行时使该菜单项失效（变灰），应使用什么语句？6、为了暂时关闭计时器（即时钟控件），应把该计时器的什么属性设置为false？7、单选按钮和复选框（即检查框）各用于什么情况？8、如何为一个菜单项设置热键和快捷键？9、菜单的形式有哪两种？10、在 keypress 事件中，如何取消用

55、户刚输入的字符？11、框架的作用是什么？12、如果要计时器每秒钟发生4 个 timer 事件，则interval 属性值应设多少？13、在一个窗体的程序代码中能否访问另一个窗体上控件的属性？若不行则请说明理由；若行则请说明如何访问。14、如何在框架中建立控件？15、组合框有哪几种类型？精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 23 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 23 页，共 31 页 - - - - - - - - -四、读程序题1

56、、对窗体编写如下代码：option base 1 private sub form_keypress(keyascii as integer) a = array(237,126,87,48,498) m1 = a(1) m2 = 1 if keyascii = 13 then for i =2 to 5 if a(i)ml then m1 =a(j) m2 =i end if next i end if print m1 print m2 end sub 程序运行后，按回车键，输出结果是什么？2、阅读下面的程序，写出执行结果。private sub form_load() form1.sho

57、w d = 0 for a = 1 to 2 for b = 1 to a for c = b to 5 d = d + 1 精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 24 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 24 页，共 31 页 - - - - - - - - -next c next b next a print d end sub 五、编程题1、在窗体上有一个文本框控件，名称为txttime ；一个计时器控件，名称为timer1

58、，要求每一秒在文本框中显示一次当前的时间，请编程实现。2、在 text1 中输入任一英文字母，在text2 中显示该英文字母及其ascii 码值。要求在文本框 text2 中显示出所有输入的英文字母及其ascii 码值，如下图所示。3、编写一个程序，能够实现任意个整数的排序。4、编程实现以下功能：用户首先分别在两个文本框中输入两个数，然后在具有“加、减、乘、除”等四个菜单项的“计算”菜单中单击某一项，即可在标签中显示出相应的结果或者错误提示。5、编程实现任意两个数的“加、减、乘、除”。6、编写一个程序，能够求任意个正整数的最大值和最小值。7、编程求任意两个正整数的最大公约数。六、程序分析填空题

59、1、建立一个如图所示的简单编辑器。用户在文本框（text1）中输入正文后，选中某些文本text1 text2 command1 精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 25 页，共 31 页 - - - - - - - - -精品学习资料 可选择p d f - - - - - - - - - - - - - - 第 25 页，共 31 页 - - - - - - - - -时可进行“剪切” 、 “复制”和“粘贴”操作。假设在窗体声明部分定义了一个变量str1，用于保存复制和剪切的内容，请把剪切按钮(btncut) 的 click 事件补充完整

60、。程序运行界面：private sub btncut_click() 请补充end sub 2、计算 1 + 2 + 3 + + 100的和并输出。 请把下面用do while loop 循环结构实现这一功能的代码补充完整。private sub form_load() dim sum,count as integer 请补充do while count =100 请补充loop text1.text = sum end sub 3、列表框控件（listbox ）支持多项选择，这项功能在对用户的兴趣爱好进行调查的时候显得非常好用，在下图所示的界面中列表框list1 用于列出爱好选项，供用户进行多项选择。精品学习资料