复习VB复习练习

1、一、填空 共 15题 (共计 30 分) 第1题在 VB6.0 中 , 若要将数值型数据转换成字符串 , 应使用的类型转 换函数是【 1】.答案： STR 第2题 如果在模块的声明段中有 Option Base 1语句, 则在该模块中使 用 Dim a(3 To 5,6) 声明的数组有【 1 】个元素 .答案： 18 第3题 对象具有属性、事件和【 1】三要素 . 答案：方法 第4题表达式 13 2 的值是【 1】 答案：6第5题由 For k=20 to 0 step 3 next k 循环语句控制的循环次数是【 1】.答案：0第6题要使一个命令按钮在程序运行时单击 "Enter&

2、quot; 键和单击此命令 按钮效果一样 , 应把此按钮的【 1】属性的值设为 True. 答案： Default第7题把整型数 1 赋给一个逻辑型变量 , 则逻辑变量的值为【 1】 . 答案： True第8题设置文字字体为粗体，应将 fontbold 属性设置为【 1】 答案： true第9题Dim a%， b%， c%a=32767: b=3c=a*b上述程序运行时会出错，应将变量【 1】数据类型改为长整型 答案：c第 10 题 在文本框、命令按钮、标签中，不能接收焦点的控件是【1】答案：标签第 11 题表达式 3 Mod 8 的值为【 1】.答案： 3第 12 题列表框控件支持【 1】事

3、件和 dblclick 答案： click第 13 题 滚动条控件有水平滚动条和【 1】滚动条 . 答案：垂直第 14 题 当一个复选框被选中时，它的 Value 的属性的值是【 1】。 答案：1第 15 题窗体Forml的Name属性为Myfrm,则它的load事件过程名为【1】 答案： form_load二、判断 共 10题 （共计 10 分） 第 1 题 鼠标双击窗体可以触发窗体的 DblClick 事件。答案：丫 第2题 菜单每一菜单项都是控件 , 可以通过点击菜单项或通过光标选 择并按回车键 , 以触发 Click 事件.答案： 丫 第3题 列表框和组合框主要的不同在于前者能选择多个

4、项目，后者不 能。答案： 丫 第4题 如果在过程调用时使用按值传递参数 , 则在被调过程中可以改变实参的值 .答案：N第5题Function 函数有参数传递 , 并且一定有返回值 .答案： N第6题窗体的 Enabled 属性设为 False 时, 窗体题的按钮、 文本框控件 就不会对用户的操作做出反应 .答案： Y第7题标签控件可以用来让用户输入数据 .答案： N第8题使用数组定义语句：DimD$(10)，则数组D中各元素的值为空。 答案： N第9题Do-Loop Until 语句实现循环时，只要条件是假，循环将一直 进行下去。答案： Y第10题VB规定窗体文件的扩展名是.vbp.答案： N

5、三、单项选择 共 20 题 (共计 20 分)第1题在窗体上画一个名称为 List1 的列表框，为了对列表框中的每 个项目都能进行处理，应使用的循环语句为 :A:For i=0 To List1.ListCount-1NextB:For i=0 To ListCount-1NextC:For i=1 To List1.listCountNextD:For i=1 To ListCountNext答案：A第2题以下叙述中错误的是 :A:下拉式菜单和弹出式菜单都用菜单编辑器建立B: 在多窗体程序中，每个窗体都可以建立自己的菜单系统C: 除分隔线外，所有菜单项都能接收 Click 事件D:如果把一个

6、菜单项的Enabled属性设置为False,则该菜单 项不可见答案：D第3题将焦点主动设置到指定的控件或窗体上，应采用()方法.A:SetData B:SetFocus C:SetTextDGetGata答案：B第4题以下关于函数过程的叙述中，正确的是:A:函数过程形参的类型与函数返回值的类型没有关系B:在函数过程中，过程的返回值可以有多个C:当数组作为函数过程的参数时，既能以传值方式传递，也能 以传址方式传递D:如果不指明函数过程参数的类型，则该参数没有数据类型 答案：A第5题、/、Mod *等4个算术运算符中，优先级最低的是().A:B:/ C:Mod D:*答案：C第6题以下关于变量作用

7、域的叙述中，正确的是:A:窗体中某个过程中声明的变量只能在本过程中使用B:全局变量必须在标准模块中声明C:模块级变量只能用Private关键字声明D:Static类型变量的作用域是它所在的窗体或模块文件 答案：A第7题一个菜单项是不是一个分隔条，由()属性决定.A:Name(名称)B:Capti on C:E nabled D:Visible 答案：B第8题为了在按下回车键时执行某个命令按钮的事件过程，需要把该 命令按钮的一个属性设置为 True，这个属性是:A:Value B:Default C:Ca ncelD:E nabled答案：B第9题以下关系表达式中，其值为 False的是：A:&

8、quot;ABC">"AbC"B:"the"v>"they"C:"VISUAL"=UCase("Visual")D:" In teger">"I nt"答案：A第10题当拖动滚动条的滚动块时,将触发滚动条的什么事件？A:Move B:Cha nge C:Clear D:Scroll 答案：D第11题设a = "MicrosoftVisualBasic"，则以下使变量 b的值为"VisualBasic

9、"的语句是，B:b = Mid(a, 10,11)D:b= Mid(a, 11, 10)将删除list1.listindex等于()的A:b = Left(a, 10)C:b = Right(a, 10)答案：B第12题语句 listl.removeitem 1 项目.A:0B:2C:3D:1答案：D 第13题要在图片框P1中打印字符串"HowAreYou",应使用语句().A:Picture1.Pri nt="HowAreYou"B:P1.Picture=LoadPicture("HowAreYou")C:P1.Pri n

10、t"HowAreYou"D:Pri nt"HowAreYou"答案：C第14题文本框中选定的内容，由下列()属性反映.A:Text B:Capti on C:SeltextD:selle nght答案：C第15题用键盘的光标键选中某一菜单项，并按回车将触发菜单的()的 事件.A:KeyPress B:KeyDow n C:Click D:KeyUp 答案：C第16题Change事件的操作是（）A:文本框失去焦点B:C:设置文本框的焦点D:答案：D第17题Clear方法适用于（）控件.A:图片框 B:窗体C:复选框以下能够触发文本框答案：DD:组合框文本框

11、获得焦点 改变文本框的内容第18题下列字符串常量中,最大的是（）.A:"A"B:"a"C:"z"D:"0"答案：C 第19题应用程序设计完成后，应将程序保存，保存的过程是（）A:只保存窗体文件即可B:只保存工程文件即可C:先保存工程文件，之后保存窗体文件D:先保存窗体文件（或标准模块文件），之后还要保存工程文件 答案：D第20题若有一菜单项（名为Menultem）,为了在运行时使该菜单项失效（变灰）,应使用的语句是A:Me nultem.E nabled = TrueB:Me nultem.Visible = Fa

12、lseC:Me nultem.Checked = TrueD:Me nultem.E nabled = False答案：D四、程序填空共2题(共计20分)第1题'功能：求1!+2!+10!的值。Private Sub Form_Click() *SPACE*【？】t=1s = 0'* SPACE *While 【？】i<=10'* SPACE *【？】s=s+tWendPrint sEnd Sub 答案：=（答案 1）=t = 1=（答案 2）=I < 11=或=I <= 10=（答案 3）=第2题' 功能：输入数字 1-7, 显示其对应是星期

13、几 (例: 输入 1, 显示星 期日,如果输入其它内容，一律显示 "输入错误 ")Private Sub Command1_Click() dim x as integer dim y as stringx=val（text1.text）I*SPACE*?】 select case xcase 1y="case 2y="今天是星期日 "星期一 "【 ？】 case elsey =end select" 输入错误 "SPACE*case 3y="case 4y= "case 5y="ca

14、se 6星期二"星期三"星期四"I*SPACE*case 7 y= "【？】y=”星期五”星期六"I*Text2.Text = yEnd Sub答案：=（答案 1）=select case x=（答案 2）= y="星期五"=（答案 3）=Case Else五、程序设计共1题（共计10分）'题目：（事件）单击窗体。'（ 响应）求从100到1000之间所有是3的倍数的数之 和，当和大于3000时，停止计算并输出和。请将结果输出到窗 体上，并存入所给变量SUM中。使用for.next 语句完成程序 答案：Dim

15、i As In tegersum=0for i=100 to 1000if i mod 3=0 the n sum=sum+iif sum>3000 thenexit forend ifend ifPrint sum六、VB窗体设计共1题（共计10分）题目：请按照题目要求设计指定的窗体。 建立如（图1）所示界面。1、在窗体内添加 2 个框架 (Frame1，Frame2)，1 个标签 (Label1) ，2 个按钮 (Command，1 Command2。)并在第1个框架(Framel)内添加1个文本框仃extl)，在第 2个框架(Framel)中添加3个单选框(Option1 ,Option2 ， Option3) 。2、窗体设置：设置窗体名称(Name)为“ Form7'。设置窗体标题(Caption)为“ VB上机试卷”。3、框架设置：设置第1个框架(Framel)的标题(Caption)为“请输入圆的 半径”。设置第1个框架(Framel)中的文本框 仃extl)的文本内容 (Text) 为 12。设置第2个框架(Frame2)的标题(Caption)为“计算类 型”。设置第2个框架(Frame2)中的单选框(Option1)的标题