VB试卷2011年考的

计算机二级等级(VB)模拟试题二一、单选题（25小题，每题1分，共25分）1.以下叙述中错误的是（）。AA.VisualBasic的版本分为个人版、专业版和服务器版B.VisualBasic应用程序既能以编译方式执行，也能以解释方式执行C.VisualBasic中控件的某些属性只能在运行时设置D.VisualBasic是事件驱动型可视化编程工具2.在设计阶段，双击窗体上的某个控件时，则打开（）。CA.工程资源管理器窗口B.属性窗口C.代码窗口D.工具箱窗口3.第一次进入VisualBasic集成化开发环境时，会出现一个“新建工程”对话框，以下哪一个不是其菜单选项？（）BA.最新B.打开C.现存D.新建4.下列可以作为VisualBasic变量名的是（）。BA.1_MNB.DimXYZC.B!FD.END5.假设X=2，Y=3，则表达式X+Y=4的值是（）。BA.TrueB.FalseC.4D.56.骰子是正六面体，如果用1～6六个整数代表其6个面，那么每投一次骰子可能出现的数值在VisualBasic可以表示为（）。AA.Int(Rnd(1)*6+1)B.Int(Rnd(6)+1)C.Int(Rnd(1)*7)D.Int(Rnd*6)7.可以实现从字符串中任意位置截取字符的函数是（）。CA.Right()B.Trim()C.Mid()D.Left()8.假设有下列语句Dima,bAsIntegerc=”VB”d=#3/1/2009#则下列说法中错误的是（）。CA.c是字符串类型变量B.d是日期类型变量C.a是Integer类型变量D.b是Integer类型变量9.表达式Int(8*sqr(36)*10^(-2)*10+0.5)/10的值是（）。CA.0.048B.0.05C.0.5D.0.4810.设X=3，Y=4，下列哪个语句不能在窗体上显示“A=7”？（）DA.Print”A=”&X+YB.Print”A=”+Ltrim(Str(X+Y))C.Print”A=”;X+YD.PrintA=X+Y11.可以实现从键盘输入一个作为双精度变量a的值的语句是（）。AA.a=Val(InputBox(”请输入一个值”))B.a=InputBox$()C.a=Val(InputBox())D.a=InputBox()12.表达式Int(-17.8)+Abs(-17.8)的值为（）。BA.-34.8B.-0.2C.5D.013.假设a=”a”，b=”b”，c=”c”，d=”d”，执行语句x=IIf((ab)，”A”，”B”)后x的值为（）。AA.“B”B.“b”C.“A”D.“a”14.Printformat$(12345,”000.00”)的输出结果是（）。AA.12345.00B.12,345.00C.12345D.345.0015.假设有如下程序段DimsAsDouble,xAsDoubles=0n=0Fori=1To5x=n/in=n+1s=s+xNext该程序段通过For循环计算一个表达式的值，该表达式为（）。DA.1+1/2+2/3+3/4B.1+1/2+2/3+3/4+4/5C.1+1/2+1/3+1/4+1/5D.1/2+2/3+3/4+4/516.在窗体上画一个命令按钮并编写如下事件过程PrivateSubCommand1_Click()x=0DoUntilx=-1a=Val(InputBox(请输入A的值))b=Val(InputBox(请输入B的值))x=Val(InputBox(请输入X的值))a=a+b+xLoopPrintaEndSub程序运行时单击命令按钮，依次在输入对话框中输入5，4，3，2，1，-1，输出结果为（）。CA.3B.14C.2D.1517.下列各控件不包含滚动条的是（）。DA.ListBoxB.TextBoxC.ComboBoxD.Label18.为了使列表框中的项目呈多列显示，需要设置的属性为（）。DA.MulitiSelectB.ListC.StyleD.Columns19.对于声明“DimX(-1To12,3To7,11)AsInteger”，数组X中元素的个数为（）。CA.700B.770C.840D.57220.执行下面程序段的结果是（）。BOptionBase1PrivateSubCommand1_Click()Dimas=0a=Array(1,2,3,4)j=1Fori=4To1Step-1s=s+a(i)*jj=j*10NextiPrintsEndSubA.4321B.1234C.34D.1221.以下关于函数过程的叙述中，正确的是（）。DA.数组作为函数过程的参数时，可以以传值或者传址两种方式传递B.函数过程返回值可以有多个C.如果不指明函数过程参数类型，则该参数没有数据类型D.函数过程形参的类型与函数返回值的类型没有关系22.不能脱离控件而独立存在的过程是（）。DA.Sub过程B.函数过程C.通用过程D.事件过程23.下列关于菜单的说法错误的是（）。CA.利用控件数组可以实现菜单的项的增加或减少B.弹出式菜单可以在菜单编辑器中设计C.把一个菜单项Enabled属性设置为False，则可删除该菜单项D.在程序运行过程中可以增加或者减少菜单项24.下列哪个函数可以判断是否到达文件末尾？（）DA.LOFB.LOCC.BOFD.EOF25.下列叙述中正确的是（）。DA.使用Input#语句可以从随机文件中读取数据B.Open命令的作用是打开一个已经存在的文件C.一条记录中包含的各元素数据类型必须相同D.随机文件中各个记录的长度是固定的二、多选题（5小题，每题2分，共10分）26.下列叙述中正确的有（）。BCA.VisualBasic企业版可以运行在WindowsXP或者Linux操作系统上B.一个工程可以有多个标准模块文件C.窗体文件包含窗体及其控件的属性D.VisualBasic中标准模块文件的扩展名为.Frm27.不是所有控件都具有的属性有（）。BCDA.NameB.BackColorC.CaptionD.BorderStyle28.以下叙述中正确的有（）。BDA.不同的对象的方法是不能相同的B.对象的方法是执行指定操作的过程C.对象事件的名称可以由编程者指定D.事件过程是响应特定事件的一段程序29.对于名称为Text1的文本框，要求其只能显示信息而不能接受输入信息，以下设置不能实现该功能的有（）。ABCDA.Text1.Width=0B.Text1.Caption=“”C.Text1.Visible=FalseD.Text1.MaxLength=030.可以删除字符串空白的函数有（）。ABA.RtrimB.LtrimC.SplitD.Mid三、填空题（10小题，每题1分，共10分）31利用SelText属性可以获取文本框的被①文本内容。（选取）32.VisualBasic联机①文件称作MSDN。（帮助）33.在编程过程中没有声明而直接使用某个变量，系统将该变量默认为①数据类型。(变体)（Variant）34.组合框是文本框和①的组合。（列表框）35.VisualBasic采用可视化的程序设计方法及①的程序设计思想。(面向对象)36.当一个复选框被选中时，它的Value值为①。（1）37.利用Ubound（）函数可以获取数组的①。（上界）38.如果要隐藏一个窗体，则需要将其①属性设置为False。（Visible）39.窗体的标题栏为深色显示，说明该窗体已经被①。（激活）40.如果想测试某一条简单的VB语句，可以在①窗口中输入相应语句后按回车观察运行结果。（立即）四、判断题（10小题，每题1分，共10分41.Sub过程与Function过程最本质的区别在于Function可以返回值，而Sub不能。AA.正确B.错误42.字节数据类型可以表示正整数、0和负整数。BA.正确B.错误43.KeyPress事件不能识别键盘上某个键的按下与释放。BA.正确B.错误44.可以利用文件打开命令（Open）新建一个文件。AA.正确B.错误45.数组中所有元素的数据类型必须相同。AA.正确B.错误46.对于过程的参数传递，实参与形参的个数必须相同，但其类型可以不同。BA.正确B.错误47.窗体文件通常包括声明部分、通用过程部分和事件过程部分。AA.正确B.错误48.在VisualBasic中编写代码可以不用区分大小写。AA.正确B.错误49.Trim函数可以去除字符串中所有的空白。BA.正确B.错误50.货币类型数据占用内存的大小与双精度数据类型一致。AA.正确B.错误五、程序分析题（3小题，每题5分，共15分）51.阅读下面程序，写出单击窗体后的运行结果。（①）(10False)PrivateSubForm_Click()DimCheckAsBoolean,CounterAsIntegerCheck=TrueCounter=0DoDoWhileCounter20Counter=Counter+1IfCounter=10ThenCheck=FalseExitDoEndIfLoopLoopUntilCheck=FalsePrintCounter,CheckEndSub52.在窗体上画一个名称为Commandl的命令按钮和两个名称分别为Textl､Text2的文本框，然后编写如下事件过程，运行时在文本框Text1中输入10，请写出单击命令按钮后Text2中显示的内容。（①）(10)PrivateSubCommand1_Click()n=Text1.TextSelectCasenCase1To20x=10Case2,4,6x=20CaseIs10x=30Case10x=40EndSelectText2.Text=xEndSub53.阅读下面程序，写出单击按钮Command1后的执行结果。（①）（9）PrivateFunctionf(mAsInteger)IfmMod2=0Thenf=mElsef=1EndIfEndFunctionPrivateSubCommand1_Click()DimiAsIntegers=0Fori=1To5s=s+f(i)NextPrintsEndSub六、程序填空题（2小题，每题6分，共12分）54.以下程序的功能是：生成20个(200,300)之间的随机整数，输出其中能被５整除的数并求出它们的和。请填空。PrivateSubCommand1_Click()RandomizeFori=1To20x=Int①Ifxmod②=0ThenPrintxS=S+xEndifNextiPrintSum=;③EndSub答案：①(Rnd*100+200)②5③S55.以下程序的功能是：从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分数和最低分数。请填空。PrivateSubForm_Click()DimxAsSingle,amaxAsSingle,aminAsSinglex=InputBox(“Enterascore”)Amax=xAmin=xDoWhilex=①IfxAmaxThenAmax=xEndIfIfx②ThenAmin=③EndIfx=InputBox(“Enterascore”)LoopPrint”Max=”;Amax,”Min=”;AminEndSub答案：①0②Amin③x七、程序设计题（1小题，每题8分，共8分）56.(编程题)八、操作题（2小题，每题5分，共10分）57.(操作题)答案：3个标签，2个文本框，2个单选按钮，两个命令按钮Text1.Text=”张三”Text2.PasswordChar=*Text2.MaxLength=5（注：0表示任意多个字符）其它：对象名.Caption=”××××××”58.(操作题)答案1：子过程PrivateSubForm_Click()DimSAsDouble,nAsIntegerS=1n=1DoWhile1/Jieche(n)0.0001S=S+1/Jieche(