《2022年完整word版,VB综合练习题汇总 .pdf》由会员分享，可在线阅读，更多相关《2022年完整word版,VB综合练习题汇总 .pdf（40页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、第一章Visual Basic 程序设计概述一、填空题1、Visual Basic 是一种面向 _的可视化程序设计语言，采取了_的编程机制。2、在 VB 中工程文件的扩展名是_，窗体文件的扩展名是_，标准模块文件的扩展名是_。3、执行 “ 工程 ” 菜单下的 _命令，可选择并添加ActiveX 控件。4、Visual Basic 6.0 用于开发 _环境下的应用程序。二、选择题1、下面不是VB 工作模式的是( ) A.设计模式B.运行模式C.汇编模式D.中断模式2、可视化编程的最大优点是( ) A.具有标准工具箱B.一个工程文件由若干个窗体文件组成C.不需要编写大量代码来描述图形对象D.所见即
2、所得3、下列不能打开属性窗口的操作是( ) 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 1 页，共 40 页A.执行 “ 视图 ” 菜单中的 “ 属性窗口 ” 命令B.按 F4 键 C.按 Ctrl+T D.单击工具栏上的“ 属性窗口 ” 按钮4、下列可以打开立即窗口的操作是( ) A.Ctrl+D B.Ctrl+E C.Ctrl+F D.Ctrl+G 5、Visual Basic 的编程机制是 ( ) A.可视化B.面向对象C.面向图形D.事件驱动三、简答题1、代码窗口主要包括哪几部分? 2、在工程资源管理器窗口中，主要列出了哪三类文件? 3
3、、窗体布局窗口的主要用途是什么? 4、VB 的基本特点是什么? 5、怎样理解可视化设计? 6、怎要理解事件驱动编程? 第二章简单的 VB 程序设计一、填空题1、设置是否可以用Tab 键来选取命令按钮，应该用_属性。精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 2 页，共 40 页2、一个控件在窗体的位置由_和_属性决定，其大小由_和_属性决定。3、利用对象的属性setfocus 可获得焦点，对于一个对象，只有其visible 属性和 _属性为 true，才能接受焦点。4、设置控件背景颜色的属性名称是_ 。5、所有控件都具有的共同属性是_属性。6、
4、一般情况下，控件有两个属性项的缺省值是相同的，这两个属性项是_。7、VB 中的每个对象(控件 )都有一组特征，这组特征称为_，我们通过修改它可以控制对象的外观和操作。8、通常情况下，VB 中一个工程主要包括如下四个文件：窗体文件、工程文件、类模块文件和 _文件， 后者的扩展名为.Bas，通常由 Basic 语言编写， 是一个可共用的子程序。9、VB 有三种工作模式，分别是设计(Design)模式、 _和中断 (Break)模式。二、选择题1、以下能够触发文本框Change 事件的操作是( ) A.文本框失去焦点B.文本框获得焦点C.设置文本框的焦点D. 改变文本框的内容2、应用程序设计完成后，
5、应将程序保存，保存的过程是( ) 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 3 页，共 40 页A.只保存窗体文件即可B.只保存工程文件即可C.先保存工程文件，之后保存窗体文件D.先保存窗体文件(或标准模块文件)，之后还要保存工程文件3、VB 应用程序的运行模式是( ) A.解释运行模式B.编译运行模式C.两者都有D.汇编模式4、任何控件都具有的属性是( ) A.TEXT B.CAPTION C.NAME D.FORECOLOR 5、决定控件上文字的字体、字形、大小及效果的属性是( ) A.TEXT B.CAPTION C.NAME D.FO
6、NT 6、在窗体上建立了多个控件，如TEXT 、LABEL1 、COMMAND1 ，若要使程序一运行焦点就定位在COMMAND1控件上，应将COMMAND1控件的 ( )设置为 0 A.INDEX B.TABINDEX C.TABSTOP D.ENABLED 7、运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的TEXT 属性进行赋值从而改变了文本框的TEXT 属性值时，将触发文本框的( )事件A.CLICK B.DBLCLICK C.GOTFOCUS D.CHANGE 第三章VB 基本语言精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第
7、4 页，共 40 页一、填空题1、一般可以使用_关键字声明常量。2、_类型也称变体类型，是一种通用的、可变的数据类型，它可表示或存储任何一种数据类型。3、变量的声明分为两种方法：_和_。4、在 VB 中，用 _语句设定数组的下界，用_和_语句分别返回数组的上、下界。5、在代码模块中加入Option Explicit 的目的是 _。6、function aa (a1 as date,optional a2 as boolean) as single，写出 optional 命令的作用_。7、在 VB 中，我们用一个简单的_语句就能实现退出程序。8、生成消息框的命令是_，生成输入框的命令是_。9、
8、通用对话框 (commondialog) 属 activex 控件，它可以显示多个标准对话框，包括打开/另存为、字体、打印等对话框，若要显示所有文件，则应设置其属性filter=_ ，若要使它显示为打印对话框，则应使用什么方法_。10、从字符串中任意位置截取字符的函数是_。11、语句 For j = 3 To 20 Step 3 使循环体执行了_次。12、对于正在使用的动态数组Arraya() ，要增加一个单元，但不能破坏数组内的数据，则应使用语句 _ 。精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 5 页，共 40 页13、在 Visual B
9、asic 中声明静态变量的关键字是_。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、在过程调用中， 实现调用过程的实参和被调用过程的形参之
10、间的数据传递有两种方式：按值传递和_ _。21、为了保证程序中必须对变量的强制性定义，需要在代码模块的声明部分加入_语句。22、分析 ForNext 循环结构的实例：For i = 5 To 30 Step 2 中，循环体一共执行了_次。23、表达式Mid(UniversityOfPetroleum, 8, 4) 的值为 _。24、常量分为普通常量和_常量。25、要将大写字母转换为小写字母，可使用_函数。精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 6 页，共 40 页26、不管焦点在哪个控件上，按_键相当于按了取消按钮。27、执行 “ 工程 ”
11、 菜单下的 _命令，可选择并添加ActiveX控件。28、_是程序中 VB 停止执行的地方。29、逻辑常量为True 或 _。30、使用了 _的声明后， 当程序中使用未经声明的变量时，程序运行时会报错。31、要将小写字母转换为大写字母，可使用_函数。32、自字符串N1 位开始向右取N2 个字符，要使用_函数。33、日期常量表示时，用符号_将日期型数据括起来。34、局部变量只能在_中声明和使用。35、模块级变量的声明关键字是Dim 或_。36、函数 Abs(x) 的功能是 _。37、表达式3/6*5 的值是 _。二、选择题1、以下哪个是合法的变量( ) A.right B.abc123 C.12
12、3_abc D.ab123c 2、下列说法错误的是( ) 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 7 页，共 40 页A.在同一模块不同过程中的变量可以同名B.不同模块中定义的全局变量不可以同名C.引用另一模块中的全局变量时，必须在变量名前加模块名D.同一模块中不同级的变量可以同名3、把 MsgBox 的返回值转换为数值应该使用的函数是( ) A.Log B.Str C.Len D.Val 4、语句 DIM AA(3,4,5) 中定义的数组有( )个元素A.12 B.60 C.120 D.345 5、下面程序运行后输出的结果是( ) A$=
13、CHINA B$=STRING$(3,A$) PRINT B$ END A.CHI B.CCC C.INA D.AAA 6、以下语句的输出结果是( ) Print Format$(32548.5, 000,000.00) A.32548.5 B.325,485.00 C.032,548,50 D.32,548,50 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 8 页，共 40 页7、以下叙述中错误的是( ) A.如果过程被定义为Static 类型，则该过程中的局部变量都是Static 类型B.Sub 过程中不能嵌套定义Sub 过程C.Sub 过
14、程中可以嵌套调用Sub 过程D.事件过程可以像通用过程一样由用户定义过程名8、Visual Basic 提供的 On Error Resume next 错误陷阱语句表示( ) A.当发生错误时，使程序转跳到语句标号为0 的程序块B.当发生错误时，不使用错误处理程序块C.当发生错误时，忽略错误行，继续执行下一语句D.当发生错误时，终止本过程执行，继续执行下一过程9、在 Visual Basic 中，若要将控制权交给操作系统则通过( )的语句。A.End B.Exit Do C.Exit Sub D.DoEvents 10、在 Visual Basic 中语句的续行号采用( ) A.空格与下划线
15、B.下划线与空格C.空格与短线D.短线与空格11、假定有以下程序段：For i=1 to 3 For j=5 to 1 Step 1 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 9 页，共 40 页Print i*j Next j,i 则语句 Print i*j 的执行次数是( ) A.15 B.16 C.17 D.18 12、从键盘上输入两个字符串，分别保存在变量str1、str2 中。确定第二个字符串在第一个字符串中起始位置的函数是( ) A.Left B.Mid C.String D.Instr 13、如果将布尔常量值TRUE 赋值给一个
16、整型变量，则整型变量的值为( ) A.0 B.-1 C.TRUE D.FALSE 14、下列叙述不正确的是( ) A.注释语句是非执行语句，仅对程序的内容起注释作用，它不被解释和编译B.注释语句可以放在代码中的任何位置C.注释语句不能放在续行符的后面D.代码中加入注释语句的目的是提高程序的可读性15、语句 PRINT “INT( -13.2) ”;INT( -13.2)的输出结果为( ) A.INT(-13.2)= -13.2 B.INT(-13.2)= 13.2 C.INT(-13.2)= -13 D.INT(-13.2)= -14 精选学习资料 - - - - - - - - - 名师归纳
17、总结 - - - - - - -第 10 页，共 40 页16、如果 TAB 函数的参数小于1，则打印位置在第( )列A.0 B.1 C.2 D.3 17、变量未赋值时，数值型变量的值为( ) A、0 B.空 C.1 D.无任何值18、下列语句中正确的是( ) A.txt1.text+txt2.text=txt3.text B.command1.name=cmdok C.12label.caption=1234 D.a=inputbox( “hello ”)19、假设变量BOOLVAR是一个布尔型变量，则下面正确的赋值语句是( ) A.BOOLVAR=TRUE B.BOOLVAR=.TRUEC
18、.BOOLVAR=#TRUE# D.BOOLVAR=320 判断循环结构的类型和循环体的执行次数，正确的选项是( ) A.当型循环， 20 次 B.直到型循环，10 次C.当型循环， 10 次 D.直到型循环，20 次26、在程序中，使用InputBox 函数可以接受用户的输入，如果要把它的返回值转换为数值型的数据，应该使用的函数是( ) A.Val B.Len C.Str D.Log 27、动态数组因为在程序运行前无法确定数组的大小，所以经常根据程序的运行情况，对数组进行重新定义，以下关于VB 中动态数组的叙述中不正确的是( ) 精选学习资料 - - - - - - - - - 名师归纳总结
19、 - - - - - - -第 14 页，共 40 页A.可以用 ReDim 语句重新定义动态数组，并且可以进行多次重定义B.首次用 Dim 进行动态数组声明的时候，必须指明它的类型和上下界C.Preserve为 ReDim 语句的可选参数，用于保留动态数组原来的内容D.当对动态数组使用Erase语句进行释放操作时，将释放其内存28、VB 中的控件也叫做部件或组件，主要包括三类，以下哪一项不属于VB 控件的分类( ) A.控件B.可插入对象C.ADO 控件D.ActiveX控件29、表达式4+5 6 * 7 / 8 Mod 9 的值是 ( ) A.4 B.5 C.6 D.7 30、可以同时删除
20、字符串前导和尾部空白的函数是( ) A.Ltrim B.Rtrim C.Trim D.Mid 三、简答题1、全局变量声明有哪些限制? 2、字符串是否可以自动转换为数字类型? 3、用 Format 函数格式化后的字符格式在不同区域环境下的输出是否相同?为什么 ? 4、在 InputBox 函数中，哪一个参数是必需的? 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 15 页，共 40 页5、在 MsgBox 函数中哪一个参数是必须的? 6、在什么情况下使用过程? 7、为什么要进行程序调试? 8、调试程序有哪些手段? 9、用语句Dim A(-3 To
21、5) As Integer 定义的数组的元素个数是多少? 10、设有如下的Visual Basic 表达式： 5*x2-3*x-2*Sin(a)/3，与它对应的数学式是什么? 11、数学式对应的 VB 表达式是什么? 12、表达式23 And 44 的值是什么 ? 13、怎样在程序中设置断点? 14、在什么情况下可以设置断点? 15、程序出错的类型有哪几种? 16、在同一模块、不同过程中声明的相同变量名，两者是否表示同一个变量?为什么 ? 17、什么情况下会出现“ 数组下标越界错误”?18、逐语句和逐过程有什么区别? 19、表达式2.75 * 2 3.45 的值是什么 ? 20、在程序设计中为
22、什么尽量不用GoTo 语句 ? 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 16 页，共 40 页四、读程序题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$ 精选学习资料 - - - - -
23、 - - - - 名师归纳总结 - - - - - - -第 17 页，共 40 页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 End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是什么? 3、阅读下面的程序，分析并写出其功能。Sub insert(a() As Single,ByVal x As Sin
24、gle) Dim m as integer,n as integer n=1 Do While na(n) 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 18 页，共 40 页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 b(i)=2*i Next i End Sub Private Sub Commandl_Click() Dim a(1 To 4
25、)As Integer a (1)=5 a (2)=6 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 19 页，共 40 页a (3)=7 a (4)=8 subP a() For i =1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，输出结果是什么? 5、分析以下程序，写出运行结果。Sub sele() Dim n as Integer i=21:n=3 Do While in i=i-n Loop Print i End Sub 精选学习资料 - - - - - - - - - 名师归纳总结 -
26、 - - - - - -第 20 页，共 40 页6、分析以下程序，写出运行结果。Sub selectPrint() Dim a as Integer Dim b 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 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 21 页，
27、共 40 页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 Integer Dim b as Integer Dim c as Integer a=3:b=3:c=2 If(a=b)and(ac)Then Print a Print a,b,c End Sub 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 22 页，共 40 页五、
28、编程题1、输入一年号，判断它是否是闰年。界面如下图所示，包括两个标签、一个文本框和一个命令按钮。提示：如果此年号能被400 整除或者不能被400 除尽，也不能被100 除尽，但能被 4 整除，则它是闰年;否则，不是闰年。2、输入两个正整数m、n，求 m 和 n 的最大公约数。要求建立如下图所示的窗体，其中主要的控件包括：两个标签(Lable1、Lable2)、两个文本框(Text1、Text2) 和一个按钮 (Command1)。3、输入某学生成绩(百分制 )，若是 100 成绩 90输出优秀 ;若是 90成绩 80输出良好 ;若是 80成绩 70输出中等 ;若是 70成绩 60输出及格 ;若
29、是 60成绩 0 ， 输出不及格 ;若是其他数则输出error 信息。4、在窗体中显示从9 号字型到 16 号字型。5、在有序序列中插入一个数，使插入后的数列仍然有序(设按由小到大排列)。6、编程实现二维数组转置。7、随机输入10 个 100 以内的整型数，计算其和及平均值。8、找出所有的水仙花数。水仙花数是个三位数，它的各位数字的立方和等于这个三位数本身。例如371=33+73+13 ，则 371 是水仙花数。9、从键盘输入一个大于2 的正整数，判断该数是否是素数。10、求二维数组中的最小值及其所在行号、列号。11、求一元二次方程ax2+bx+c=0 的根 (包括实根和复根)。精选学习资料
30、- - - - - - - - - 名师归纳总结 - - - - - - -第 23 页，共 40 页12、输入一个正整数n，计算出n!并输出。13、Faibonacci 数列为 0，1，1，2， 3，5，8， 13 ，计算并输出第20 项以及前20 项的和。第四章常用控件与窗体一、填空题1、向列表框控件添加新项目的方法是_。2、在 VB 中，最主要的两种对象是_和_。3、当窗体启动时可通过_属性控制窗体位于所有者的中心位置。4、若要将窗体Form1 隐藏起来，则可通过执行代码_来实现。5、要使装入到列表框中的数据项能自动按字母顺序排序，应设置该控件的_属性为 _。6、窗体上放置了若干个文本框
31、和命令按钮，当窗体装入后，要将焦点自动定位到文本框 Text1 上，则在设计时需要将_控件的 _属性设置为 _。7、在标签控件中通过编程使文字换行用的代码是_。8、设置计时器控件只能触发_事件。9、设置计时器对象触发事件的时间间隔用_属性。10、滚动条控件主要支持两个事件，它们是_事件。精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 24 页，共 40 页11、要使鼠标停留在按钮上显示特殊的鼠标形状，应设置的属性值是_。12、设某列表框共有10 项，按题目要求补齐程序，完成相应的功能。(1)按下命令按钮Command1 时将列表框第8 项的内容显示
32、在窗体上：Private Sub Command1_Click( ) List._(7)=True Print List1._ End Sub (2)单击列表框某一项时立即将该项打印在窗体上：Private Sub List1_Click( ) Print_ End Sub (3)按下命令按钮Command1 时在窗体上删除第1、3、5、7、9 项：Private Sub Command1_Click( ) For I=1 To 5 List1._ Next I 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 25 页，共 40 页End Sub
33、(4)在列表框的每一项之后插入一个新的项：Private Sub Command1_Click( ) For I=1 to 10 X=InputBox( “ 请输入插入的第” & I & “ 项内容 ”)List1.AddItem_ Next I End Sub 13、设在界面上放置了一个滚动条Hscroll1 和一个标签控件Label1，要使每次单击滚动条两端箭头时， 或单击滚动条滑块与两端箭头之间的空白区域时，标签内容能够反映滚动条的值，补齐以下代码。Private Sub Hscroll1._( ) Label1.Caption = Hscroll1._ End Sub 要使拖动滚动条滑
34、块时标签内容能够反映滚动条的值，补齐以下代码。Private Sub Hscroll1._( ) Label1.Caption = Hscroll1._ 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 26 页，共 40 页End Sub 14、列表框 (ListBox) 用于列出可供选择的项目的列表，用户可以选择一个或多个项目。它具有几个非常重要的数组属性，其中_ _属性存放了列表框中所有项目的值。15、菜单项一般由标题、访问键、快捷键和复选标志等构成，通过对相应的属性进行设置可以改变这些项目的状态，其中与复选标志相对应的属性是_ _。16、ke
35、ydown 与 keypress事件各有其参数，若需获得用户按下a 还是A 需用 _事件。17、控件 _组合了文本框和列表框的功能，是 VB 中一种功能非常强大的选择类控件。18、若需要将窗体Form2 以模态窗口的形式显示出来，可通过执行代码_来实现。19、菜单中的分隔条是一种菜单控件，不响应_事件，不能被选中。二、选择题1、当程序运行时，在窗体上单击鼠标，以下哪个事件是窗体不会接收到( ) A.MouseDown B.MouseUp C.Load D.Click 2、窗体 Form1 的 Name 属性是 Frm1，它的单击事件过程名是( ) A.Form1_Click B.Form_Cl
36、ick C.Frm1_Click D.Me_Click 3、用于设置通用对话框控件显示文件类型的属性是( ) 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 27 页，共 40 页A.Filter B.Path C.Partern D.FoleName 4、用于从内存删除窗体的命令是( ) A.Move B.Hide C.Unload D.Delete 5、用于返回窗体可用区域宽度的属性是( ) A.ScaleWidth B.ScaleLeft C.ScaleHeight D.ScaleTop 6、下列关于属性设置的叙述错误的是：( ) A.一个控
37、件具有什么属性是VB 预先设计好的，用户不能改变B.一个控件具有什么属性是VB 预先设计好的，用户可以改变C.一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置D.一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值7、下列说法正确的是( ) A.对象属性只能在“ 属性窗口 ” 中设置B.一个新的工程可以在“ 工程窗口 ” 中建立C.必须先建立一个工程，才能开始设计应用程序D.只能在 “ 代码窗口 ” 中编写程序代码8、下列关于窗体上控件的基本操作错误的是( ) A.按下一次 DEL 键只能删除一个控件精选学习资料 - - - - - - - - - 名师归纳总结 - - -
38、 - - - -第 28 页，共 40 页B.按下一次 DEL 键可以同时删除多个控件C.按住 SHIFT 键，然后单击每个要选择的控件，可以同时选中多个控件D.按住 ALT 键，然后单击每个要选择的控件，可以同时选中多个控件9、下列关于设置控件属性的叙述正确的是( ) A.用户必须设置属性值B.所有的属性值都可以由用户随意设定C.属性值不必一一重新设置D.不同控件的属性项都完全一样10、不可以通过下列( )操作将焦点赋给对象A.运行时使用TAB 键 B.在代码中用CALL 语句调用C.在代码中用SETFOCUS 方法D.用访问键或用鼠标单击选择对象11、要在 FORM_LOAD事件过程中使用
39、PRINT 方法在窗体上输出一定的内容，应( ) A.设置窗体的VISIBLE 属性B.设置窗体的CAPTION C.调用窗体的SHOW 方法D.设置窗体ENABLED属性12、下面 ( )对象无 CAPTION 属性A.FORM B.COMMANDBUTTON C.TEXTBOX D.LABEL 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 29 页，共 40 页13、通用对话框控件和文件列表框控件中，都能根据文件的类型对要显示的文件进行筛选过滤，后者使用( )属性进行该项设置。A.Pattern B.Path C.Filter D.FileN
40、ame 14、对于复选框控件chkBoy ，如果在程序中设置它为选中状态，下面语句正确的是( ) A.chkBoy.Checked = true B.chkBoy.Value = true C.chkBoy.Selected = true D.chkBoy.Value = 1 15、计时器 (Timer) 控件用于每隔一段时间自动触发一次Timer 事件，可以有规律地重复执行一段程序，它用于设置两次事件时间间隔的属性是( ) A.Interval B.SmallChange C.LargeChange D.Max 16、以下关于VB 中窗体 (Form)的说法中，不正确的描述为( ) A.执行
41、 Unload Form 语句后，窗体Form 消失，但仍在内存中B.当窗体的Enabled 属性为 False 时，通过鼠标和键盘对窗体的操作都被禁止C.窗体的 Height 、width 属性用于设置窗体的高和宽D.窗体的 load 事件在加载窗体时发生17、关于滚动条控件，下面说法错误的是( ) A.点击滚动条的箭头，可以改变它的value 值，从而引发Change 事件精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 30 页，共 40 页B.拖动滚动框，可以触发Scroll 事件C.通常，水平滚动条的值从左向右递增，垂直滚动条的值自上而下递
42、增D.拖动滚动框，可以触发Change 事件，而且是连续触发的18、在窗体上放置一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程：PriVate Sub Command1_C1ick() a$=software and hardware b$=Right(a$,8) c$=Mid(a$,1,8) Msgbox a$,b$,c$,1 End Sub 则在弹出的信息框的标题栏中显示的信息是( ) A.softWare and hardware B.software C.hardwafe D.出现错误19、在多重窗体程序设计中，关键的问题是要解决不同窗体之间的衔接和窗体的显示、
43、关闭等问题，以下关于窗体的相关语句和方法的叙述中，错误的是( ) A.Load 语句用于加载指定窗体，即在内存中创建该窗体精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 31 页，共 40 页B.Show 方法兼具 Load 语句的功能，可以将窗体显示出来C.Hide 方法用于将窗体隐藏起来D.Unload 语句用来释放窗体，但窗体并没从内存中消20、滚动条控件的属性中，表示取值范围最大值的属性是( ) A.Max B.LargeChange C.Min D.Value 21、程序中如果需要检测和控制鼠标的位置和状态的改变，就需要使用鼠标事件，其中
44、下面哪个选项用于表示拖动事件( ) A.DragDrop B.MouseDown C.MouseUp D.MouseMove 22、为了使用通用对话框进行打开文件的操作，应将通用对话框的Action 属性设定为( )。A.0 B.1 C.2 D.3 三、简答题1、什么是单选按钮?什么是复选框?在使用上有什么不同? 2、滚动条的change事件和 scroll 事件有什么不同? 3、快捷键和访问键有什么区别? 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 32 页，共 40 页4、在程序运行期间，如果拖动滚动条上的滚动块(即滑块 )，则触发滚动条的
45、什么事件? 5、假定有一个菜单项，名为MenuItem ，为了在运行时使该菜单项失效(变灰 )，应使用什么语句 ? 6、为了暂时关闭计时器(即时钟控件 )，应把该计时器的什么属性设置为False? 7、单选按钮和复选框(即检查框 )各用于什么情况? 8、如何为一个菜单项设置热键和快捷键? 9、菜单的形式有哪两种? 10、在 KeyPress 事件中，如何取消用户刚输入的字符? 11、框架的作用是什么? 12、如果要计时器每秒钟发生4 个 Timer 事件，则Interval 属性值应设多少? 13、在一个窗体的程序代码中能否访问另一个窗体上控件的属性?若不行则请说明理由;若行则请说明如何访问。
46、14、如何在框架中建立控件? 15、组合框有哪几种类型? 四、读程序题1、对窗体编写如下代码：Option Base 1 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 33 页，共 40 页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 P
47、rint m1 Print m2 End Sub 程序运行后，按回车键，输出结果是什么? 2、阅读下面的程序，写出执行结果。精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 34 页，共 40 页Private Sub Form_load() Form1.show d = 0 For a = 1 To 2 For b = 1 To a For c = b To 5 d = d + 1 Next c Next b Next a Print d End Sub 五、编程题1、在窗体上有一个文本框控件，名称为TxtTime; 一个计时器控件，名称为Time
48、r1，要求每一秒在文本框中显示一次当前的时间，请编程实现。2、在 Text1 中输入任一英文字母，在Text2 中显示该英文字母及其ASCII 码值。要求在文本框 Text2 中显示出所有输入的英文字母及其ASCII 码值，如下图所示。精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 35 页，共 40 页3、编写一个程序，能够实现任意个整数的排序。4、编程实现以下功能：用户首先分别在两个文本框中输入两个数，然后在具有 “ 加、减、乘、除 ” 等四个菜单项的“ 计算 ” 菜单中单击某一项，即可在标签中显示出相应的结果或者错误提示。5、编程实现任意两个
49、数的“ 加、减、乘、除” 。6、编写一个程序，能够求任意个正整数的最大值和最小值。7、编程求任意两个正整数的最大公约数。六、程序分析填空题1、建立一个如图所示的简单编辑器。用户在文本框(text1)中输入正文后，选中某些文本时可进行 “ 剪切 ” 、 “ 复制 ” 和“ 粘贴 ” 操作。假设在窗体声明部分定义了一个变量str1，用于保存复制和剪切的内容，请把剪切按钮(btnCut)的 Click 事件补充完整。程序运行界面：精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 36 页，共 40 页Private Sub btnCut_Click() 请
50、补充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 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 37 页，共 40 页3、列表框控件(ListBox) 支持多项选择，这项功能在对用户的兴趣爱好进行调查的时候显得非常好用， 在下图所示的界面中