VB复习题(含答案).docVIP

VB复习题一、 选择题1 设窗体上有一个文本框，名称为text1,程序运行后，要求该文本框不能接受键盘输入，但能输出信息，以下属性设置正确的是： BA)text1.maxlength=0 B)text1.enabled=falseC)text1.visible=false D)text1.width=0 2 以下能在窗体Form1的标题栏中显示“VisualBasic窗体的语句是 CA) Form1.Name=VisualBasic窗体B) Form1.Title=VisualBasic窗体C) Form1.Caption=VisualBasic窗体D) Form1.Text=VisualBasic窗体”3 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：CPrivate Sub Command1_Click()x=InputBox(Input)Select Case xCase 1,3Print 分支 1Case Is 4Print 分支 2Case ElsePrint Else 分支 End SelectEnd Sub程序运行后，如果在输入对话框中输入2，则窗体上显示的是A） 分支1 B） 分支2 C） Else分支 D) 程序出错4 以下关于MsgBox的叙述中，错误的是 D （见书P88-92）A）MsgBox函数返回一个整数 B) 通过MsgBox函数可以设置信息框中图标和按钮的类型C) MsgBox语句没有返回值D) MsgBox函数的第一个参数是一个整数，该参数只能确定对话框中显示的按钮数量5 在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是 DA） Timer1.InterVal=0.5 B) Timer1.Interval=5C) Timer1.Interval=50 D) Timer1.Interval=5006 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：BPrivate Sub Command1_Click()Static x As IntegerClsFor i=1 To 2y=y+xx=x+2Next Print x,yEnd Sub程序运行后，连续三次单击Command1按钮后，窗体上显示的是A) 4 2 B) 12 18 C) 12 30 D) 4 67 以下叙述中错误的是 DA）事件过程是响应特定事件的一段程序B）不同的对象可以具有相同名称的方法C）对象的方法是执行指定操作的过程D）对象事件的名称可以由编程者指定8 以下合法的Visual Basic标识符是 AA) ForLoop B) Const C) 9abc D) a#x9 当一个复选框被选中时，它的Value属性的值是 CA) 3 B) 2 C) 1 D) 010 表达式 5 Mod 3+35*2的值是 BA) 0 B) 2 C)4 D) 611 设x=4,y=8,z=7，以下表达式的值是 Dxz) Or z x Then Print a(i);Next iEnd Sub程序运行后，单击命令按钮，在窗体上显示的内容是A）1 2 B） 1 2 3 C) 3 4 5 D） 4 521.在Visual Basic设计界面中不能隐藏的窗口是( A )。A）工程窗口B）属性窗口C）立即窗口D）窗体窗口22.以下可以构成语句的一项是( B )。A）对象名.属性B）对象名.方法名C）对象名.事件名D）对象名.函数名23.以下不是Visual Basic 的特点的选项是( B )。A）可视编程B）算法设计C）事件驱动D）面向对象24 在Visual Basic中通过( A )属性来设置字体的颜色。A）FontColorB）ClipControlC）BackColorD）ShowColor25 设置窗体的绘图方式是否在Paint事件中重绘整个窗体内容利用( D )属性。A）ControlBoxB）ClipControlC）BordeStyleD）AutoRedraw26 ( C )是由Visual Basic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。A）文件B）属性C）方法D）窗体27 以下不属于同类的是( A )。A）ClickB）NameC）CaptionD）Top28 当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的是( B )。A）AutoSize 属性B）Resize事件C）AutoRedraw 属性D）Stretch方法29 .对象可以识别和响应的某些行为称为( D )。A）属性A）方法C）继承D）事件30 与传统的程序设计语言相比，Visual Basic 最突出的的特点是( C )。A）结构化程序设计B）程序开发环境C）事件驱动编程机制D）程序调试技术31 在正确安装Visual Basic6.0后，可以通过多种方式启动Visual Basic。以下方式中，不能启动Visual Basic的是( D )。A）通过“开始”菜单中的“程序”命令B）通过“我的电脑”找到vb6.exe，双击该文件名C）通过“开始”菜单中的“运行”命令D）进入DOS方式，执行vb6.exe文件32 为了用键盘打开菜单和执行菜单命令，第一步应按的键是( A )。A）功能键F10或AltB）Shift+功能键F4C）Ctrl或功能键F8D）Ctrl+Alt33 Visual Basic6.0集成环境的主窗口中不包括( C ) 。A）标题栏B）菜单栏C）状态栏D）工具栏34 用标准工具栏中的工具按钮不能执行的操作是( B )。A）添加工程B）打印源程序C）运行程序D）打开程序35 Visual Basic窗体设计器的主要功能是( A )。A）建立用户界面B）编写源程序代码C）画图D）显示文字36 在Visual Basic环境下，当写一个新的Visual Basic程序时，所做的第一件事是( B )。A）编写代码B）新建一个工程C）打开属性窗口D）进入Visual Basic环境37 下列不属于Visual Basic6特点的是( C )。A）对象的链接与嵌入B）结构化程序设计C）编写跨平台应用程序D）事件驱动程序编程机制38 下列不是Visual Basic6.0中打开工程的方法( A )。A）Alt+OB）执行“文件”菜单中的“打开工程”命令C）Ctrl+OD）单击标准工具栏上的“打开工程”按钮39 下面关于Visual Basic6.0工具栏的说法不正确的是( B )。A）工具栏的位置可以任意改变B）工具栏一定在菜单栏的下方C）工具栏可以显示或隐藏D）Visual Basic有多个工具栏40 下列各组函数中，函数值类型相同的一组是( C )。A）Exp(x)、Chr(x)、Lcase(x)B）Asc(x)、Str(x)、RTrim(x) (注：Asc(x)为转换函数)C）Sgn(x)、Cint(x)、Asc(x)D）Fix(x)、Left(x)、Ucase(x)41可以使X为数值型数据的语句是( A )。A）X=val(InputBox（请输入数据）)B）X=InputBox$（请输入数据）C）X=Textl.TextD）X=Listl.list（3）42 既可用于输入数据又可用于输出数据的控件是( B )控件。A）LabelB）TextBoxC）ListBoxD）OptionButton43 可用作输入数据的控件是( A )控件。A）OptionButton和CheckBox B）ListBox和ComboBoxC）Label和TextBoxD）Form和Frame44 阅读事件过程，回答问题。Private Sub Commandl_Click( )x=InputBox(请输入X的值：)y=Text1.Textz=x+yDebug.Print zEnd Sub 在InputBox函数弹出的对话框中输入123，在文本框Textl中输入456。单击命令按钮Commandl后，窗口上立即显示出( C ) 。A）123B）579C）123456D）错误信息45 已执行语句x=123456.789，输出x值时要求加午位分隔答，小数点后取2位有效数字。下列格式输出语句正确的是 B 。 （注：见P82 - 84）A）Print Format$(x,#,#.#)B）Print Format$(x, #,#.#)C）Print Format$(x, ,#.# )D）Print Format$(x, #,.#)46 Format$函数中，格式说明符的使用规则正确的是 B 。A）格式符“#”与“0”的作用完全相同B）格式符“.”与格式符“#”与“0”结合使用，用于确定输出数据的小数点位置C）若Format$函数中使用“%”或“$”格式符，则在所显示的数值后加上一个“%”负号或一个“$”号D）格式符“+”或格式符“-”表示：若输出正数，则在数值前加上一个正号；若输出负数，则在数值前加上一个负号47 下列程序段的执行结果为 A 。A=HELLOGOODMORNINGB=WANGCHANGLIC=Left(A,5)+ !D=Right(A,7)E=Mid(A,6,4)F=Mid(B,Len(B)-6,5)+ !G=E+D+! H=C+FPrint H+GA)HELLO！CHANG！GOODMORNING！B)HELLO！WANG！GOODMORNING！C)HELLO！LI！GOODMORNING！D)HELLO！CHANG！GOOD！MORNING！48有如下程序：DefStr X-Z X=123Y=456Z=X$+Y$Print Z$End运行后，输出的结果是 B 。A）显示出错信息B）123456C）“579”D）57949 选拔身高T超于1.7米且体重W小于62.5公斤的人，表示该条件的布尔表达式 C 。A）T1.7 And W=62.5B）T=62.5C）T1.7 And W1.7 Or W=b And b10B) (ab)Or(b0)C) (a0)D) (-3+5a) And (b0)66 设有语句x = InputBox(输入数值, 0,示例)程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是( D )A) 变量X的值是数值10B) 在InputBox对话框标题栏中显示的是“示例”C) 0是默认值D) 变量X的值是字符串“10” 67 从键盘上输入两个字符串，分别保存在变量 str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是( D )A) Left B) MidC) String D) Instr68 设a=Visual Basic，下面使b=Basic的语句是( B )A) b=Left(a，8，12) B) b=Mid(a，8，5)C) b=Right(a，5，5) D) b=Left(a，8，5)69 下列程序Private Sub Form_click( ) Dim a As Integer, b As Integer, x As Integer a=InputBox(“a=?”) b= InputBox(“b=?”) x=a+b If ab Then x=a-b Print xEnd Sub运行时从键盘输入3和4，输出的x的值是( C )。A 3 B 5 C 7 D 970 下列程序Private Sub Form_click( ) E=1: F=1 For J=1 to 3E=E+F: F=F+E Next JPrint E; FEnd Sub该程序的输出结果是( C )。A 6 6 B 5 8 C 13 21 D 34 55 71 下列程序Private Sub Form_click( ) For x=1 to 2a=0 For y=1 to x+1 a=a+1 Next y Print a;Next x End Sub运行时输出的结果是( D )。A 1 1 B 0 0 C 1 2 D 2 372 下列程序Private Sub Form_click( ) s=Val(InputBox(“input value of s:”) Select Case s Case Is6 f=s+1 Case Is5 f=s+2Case Is=30Print Number; sEnd Sub运行输出的结果是( D )。A 0 1 B 30 30 C 4 30 D 3 18276 下列程序Private Sub Form_click( )a=70For j=1 to 4 x=Val(InputBox(“请输入一个数”) If x Mod 5=0 Then b=b+x: a=x Else b=b+aEnd IfNext jPrint bEnd Sub运行时输入75, 55, 42, 80, 输出的结果是( B )。A 252 B 265 C 280 D 28577 下列程序Private Sub Form_click( ) c=4 d=Val(InputBox(“请输入一个数”) Do While d0If dc Then c=c+1d=Val(InputBox(“请输入一个数”) LoopPrint c+dEnd Sub运行时输入9,8,7,6,5,4,3,2,1,0，输出的结果是( C )。A 5 B 6 C 7 D 878 下列程序Private Sub Form_click( ) c=4 x=Val(InputBox(“请输入一个数”) While x-999If xc Then c=xX=Val(InputBox(“请输入一个数”) WendPrint c; : Print Abs(x)End Sub运行时输入5,9,8,2,-999，输出的结果是( C )。A 9 8 B 9 2 C 9 999 D 2 999二、 填空题1在对象名与事件名之间用 _ 符号连接。窗体的对象名用 Form 表示。2Visual Basic 的窗体和控件是具有自己的 属性 、 事件 和方法的对象。3窗体和控件的大部分属性可以通过 属性窗口 设置、也可以通过 程序代码 设置。4在面向对象程序设计中，对象是一个由代码 和 数据 组成的概念。5Visual Basic 中的对象包括窗体 、 控件 和 可访问的实体 。6Name属性的含义是 设置对象名称，窗体的默认Name属性是 Form1 。7Show 方法的作用是 显示一个窗体 ，Hide 方法的作用是 隐藏一个窗体 。8. 一个窗体对象，其最先发生的事件是 Load 事件，最后发生的事件是 Unload 事件。9. 移动窗体时，为了初始化该窗体中的各控件，可选用窗体的Load 事件；关闭窗体用 Unload 事件。10.窗体对象可以识别KeyPress、KeyUp、KeyDown事件，在按下某键时，这三个事件发生的顺序是： KeyDown 、 KeyPress 、 KeyUp 。11.设A=37，则Hex（A）= 25 ，Oct (A)= 45 。12. 若A=120，B=80，C=70、D=30，则式A+B160 Or (B*C200 And Not d60)的值是 True 。13.Visual Basic中，变量名字只能由 英文字母 、数字、下划线组成，总长度不得超过 255 。14.表达式6 Mod 2*62/62的值为 0 。15.表达式Len(Str(1.3) 的值为 4 。16.log10x/(0.5+x2)的Visual Basic表达式为 (logx/log10)/(0.5+x2) 。（注：超过要求）17.表达式Int (Rnd*10+0.5)可能的全部值 0,1,2,3,4,5,6,7,8,9,10 。18Format(10, 0.00%)的返回值为 1000.00% 。19. 设有如下程序段：a$=BeijingShanghaib$=Mid(a$,InStr(a$,g)+1)执行上面的程序段后，变量b$的值为_Shanghai_。20. Visual Basic应用程序中工程文件的扩展名是_vbp_21将C盘根目录下的图形文件moon.jpg装入图片框Picture1的语句是Picture1.picture = loadpicture(“c:moon.jpg”)_； 而将与工程文件同在一目录下的图形文件moon.jpg装入图片框Picture1的语句是Picture1.picture = loadpicture(app.path + “moon.jpg”)_ _22 在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示，请填空。Private Sub Option1_Click(Index As Integer) Select Case _index_ Case 0 a = 宋体 Case 1 a = 黑体 Case 2 a = 楷体GB2312 End Select text1.fontname_ = aEnd Sub23 在窗体上画两个组合框，其名称分别为Combo1、Combo2，然后画两个标签，名称分别为Label1、Label2，如图所示，程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空。Private Sub Combo1_Click() Call ShowItem(Combo1, Label1)End SubPrivate Sub Combo2_Click() Call ShowItem(Combo2, Label2)End SubPublic Sub ShowItem(tmpCombo As ComboBox, tmpLabel As Label) _ tmpLabel _.Caption =_ tmpCombo _.TextEnd SubE24 下面程序的功能是计算1到10之间的奇数之和及偶数之和，请在_处填入正确的语句。Private Sub Form_Click() a=0 c=0 For i=1 To 10 Step 2a=a+ic=c+i+1_Next IPrint “奇数之和=”; aPrint “偶数之和=”; cEnd Sub 25. 下面程序的功能是：输出100以内能被3整除且个位数为6的所有