江西省考2010二级VB试卷.doc

全国高等学校计算机等级考试（江西考区）2010年下半年二级Visual Basic笔试试卷A（本试卷答卷时间为120分钟，满分100分）I、计算机基础部分（30分）试题一、选择题（每个选项1分，共30分）。考生从提供的答案中选择一个正确的，并把所选答案的字母填入答题卡对应栏内。1、目前大多数计算机，就其工作原理而言，基本上采用的是科学家 （1） 提出的思想。（1）A）比尔盖茨B）冯诺依曼C）乔治布尔D）艾伦图灵2、将高级语言写成的程序翻译成机器语言程序，采用的两种翻译方式是解释和 （2） 。（2）A）编辑B）汇编C）编译D）链接3、“图书检索系统”软件属于 （3） 。（3）A）系统软件B）应用软件C）高级语言D）开发工具4、在一个非零无符号的二进制整数之后添加一个0，则此数为原数的 （4） 。（4）A）4倍B）2倍C）1/2倍D）1/4倍5、在计算机指令中，规定其所执行操作功能的部分称为 （5） 。（5）A）地址码B）源操作数C）操作数D）操作码6、二进制数10101011转换成十六进制数是 （6） 。（6）A）ABB）BCC）ACD）BD7、微型计算机中，内存储器比外存储器 （7） 。（7）A）存储容量大B）读写速度快C）运算速度慢D）以上三项都对8、某人的电子邮件在到达时，若他的计算机没有开机，则邮件 （8） 。（8）A）退回给发件人B）开机时对方重发C）存放在服务商的E-mail服务器D）该邮件丢失9、电子邮件的传输协议是 （9） （9）A）DHCPB）FTPC）SMTPD）CMIP10、计算机病毒是一种 （10） 。（10）A）生物病毒B）外部设备C）游戏软件D）人为编制的特殊程序11、WinRAR是一个 （11） 软件。（11）A）压缩软件B）解压缩软件C）压缩和解压缩软件D）安装工具软件12、ASCII码中的每个字符都可以用二进制数来表示，例如A表示为01000001，B表示为01000010，那么字符F可表示为 （12） 。（12）A）0100011B）01000111C）01000101D）0100011013、在Windows XP中，回收站的作用是 （13） 。（13）A）保存文件碎片B）存放被删除的文件C）保存被复制的文本D）保存被剪切的文本14、Windows XP中，在“资源管理器”窗口中一次选中多个连续的文件可以先按住 （14） 键，再用鼠标选取。（14）A）AltB）CtrlC）TabD）Shift15、Windows XP的文件系统的多级目录结构是一种 （15） 。（15）A）树型结构B）线性结构C）二维表结构D）图形结构16、在Windows XP中，改变日期或时间的操作 （16） 。（16）A）只能在桌面上设置B）只能在“控制面板”中选择“日期和时间”C）只能双击“任务栏”右侧的数字时钟D）不止一种方法可改变它17、在Windows XP中，同时按 （17） 组合键，可以打开“任务管理器”以关闭些不需要的或没有响应的应用程序。（17）A）Ctrl+Alt+DelB）Ctrl+Shift+DelC）Shift+Alt+EnterD）Shift+Alt+Del18、在Windows XP中，单击对话框中的“确定”按钮与按 （18） 键的作用是一样的。（18）A）EscB）EnterC）F1D）F219、当选定了某项内容并单击“剪切”“粘贴”菜单后，剪贴板中的内容为 （19） 。（19）A）空B）文本片段C）目标处的内容D）剪切下来的内容20、下列汉字输入法中， （20） 不存在重码。（20）A）区位码B）微软拼音输入法C）智能ABCD）智能五笔21、在Word 2003中，选择了全文，若在“段落”对话框中设置行距为25磅，应当选择“行距”列表框中的 （21） 。（21）A）单倍行距B）1.5倍行距C）多倍行距D）固定值22、在Word 2003中，“查找”、“替换”功能所在的下拉菜单是 （22） 。（22）A）编辑B）格式C）插入D）视图23、在Word 2003中，使用统计函数 （23） 可计算表格中某行数值的平均值。（23）A）COUNT()B）AVERAGE()C）INT()D）SUM()24、Word 2003程序启动后自动打开一个名为 （24） 的文档。（24）A）UndoB）NonameC）用户1D）文档125、在Word 2003中对长文档编排页码时，下述说法中不正确的是 （25） 。（25）A）添加或删除内容时，能随时自动更新页码B）一旦设置了页码就不能删除C）在“普通”视图中不能显示页码D）文档第一页的页码数可以任意设定26、在Excel 2003中，公式是用于按照特定顺序进行数据计算并输入数据的，它的最前面是 （26） 号。（26）A）=B）：C）$D）！27、在Excel 2003中，已知A1单元格中的公式为=SUM(B1:F6)，将B列删除之后，A1单元格中的公式将调整为 （27） 。（27）A）=SUM(#REF!)B）=SUM(C1:F6)C）=SUM(B1:E6)D）=SUM(B1:F6)28、在PowerPoint 2003中，按下键盘上的 （28） 键可以停止正在放映的幻灯片。（28）A）ESCB）AltC）F5D）Ctrl+Q29、在一张幻灯片中，若对一幅图片及文本框设置成一致的动画显示效果时，则以下 （29） 是正确的。（29）A）图片有动画效果，文本框也有动画效果B）图片没有动画效果，文本框有动画效果C）图片有动画效果，文本框没有动画效果D）图片没有动画效果，文本框也没有动画效果30、在展销会上，如果要求幻灯片能在无人操作的环境下自动播放，应该事先对PowerPoint 2003演示文稿进行的操作是 （30） （30）A）观看放映B）动作设置C）排练计时D）自定义放映II、程序设计语言部分（70分）试题二、语言基础选择题（每个选项1分，共25分）。考生从提供的答案中选择一个正确的，并把所选答案的字母填入答题卡对应栏内。1、VB是面向对象的程序设计语言，下面 （31） 不是面向对象包含的三要素。（31）A）变量B）事件C）属性D）方法2、清除运行在Form1窗体上显示的文本或图形所使用的代码是 （32） 。（32）A）Form1.HideB）Form1.ClsC）Form1.ShowD）Form1.Print3、下面程序运行后，显示的结果是 （33） Dim x%If x Then Print x+1 Else Print x（33）A）1B）0C）2D）显示错误信息4、在VB 6.0集成开发环境中，不包括 （34） 窗口。（34）A）DOS界面B）窗体C）代码D）属性5、单选按钮的名称是 （35） 。（35）A）ComboBoxB）CommandButtonC）PictureBoxD）OptionButton6、工具箱中的Timer控件是指 （36） 。（36）A）图像控件B）文件列表框控件C）形状控件D）时钟控件7、关于窗体对象的说法不正确的是 （37） 。（37）A）Caption、Enabled、Font、BackColor等都是窗体对象的属性B）Height、Width、Left、Top等都是窗体对象的方法C）Hide、Show、Move等都是窗体对象的方法D）Activate、GotFocus、Click、KeyDown等都是窗体对象的事件8、下面程序运行后，显示的结果是 （38） 。Dim xx=Int(Rnd)+5Select Case x Case 5 Print优秀 Case 4 Print良好 Case 3 Print及格 Case Else Print不及格End Select（38）A）不及格B）良好C）优秀D）及格9、下面VB语句求两个数中较大数， （39） 不正确。（39）A）Max=IIF(xy,x,y)B）If xy Rhen Max=x Else Max=yC）Max=x:If Y=x Max=yD）If Y=x Max=y:Max=x10、下面的VB程序段的运行结果是 （40） 。For i=3 To 1Step -1 Print Spc(5-i) For j=1 To 2*i-1 Print$ Next j PrintNext i（40）A）$B）$C）$D）$11、Visual Basic窗体文件的类型是 （41） 。（41）A）.frmB）.batC）.basD）.cls12、以下能判断是否到达文件尾的函数是 （42） 。（42）A）BOFB）ASCC）NewD）EOF13、下列VB程序段的执行结果为 （43） 。A=0:B=1A=A+B:B=B+A:Print A;BA=A+B:B=B+A:Print A;B（43）A）1 2B）1 1C）1 3D）1 23 53 53 43 414、设窗体中存在命令按钮Command1，其Click事件代码如下：Private Sub Command1_Click() x=2 y=1 If x*y0End Sub程序运行后，单击该命令按钮，输出结果为 （44） 。（44）A）TrueB）FalseC）-1D）115、设a=5、b=6、c=7、d=8，执行下列语句后，x的值为 （45） 。X=IIf(ab)And(cd),10,20)（45）A）10B）20C）TrueD）False16、在窗全上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() c=1234 c1=Trim(Str(c) For i=1 To 4 Print_ NextEnd Sub程序运行后，单击命令按钮，要求在窗体上显示如下内容：1121231234则在下划线处应填入的内容为 （46） 。（46）A）Right(c1,i)B）Left(c1,i)C）Mid(c1,i,1)D）Mid(c1,i,i)17、InputBox函数返回值的类型为 （47） 。（47）A）数值B）字符串C）变体D）数值或字符串（视输入的数据而定）18、在VB中，以下叙述中错误的是 （48） 。（48）A）一个工程中可以包含多个窗体文件B）窗体和标准模块需要分别保存为不同类型的磁盘文件C）在一个窗体文件中用Public定义的通用过程不能被其他窗体调用D）用Dim定义的窗体层变量只能在该窗体中使用19、窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：Private Sub Command1_Click() a=InputBox(Enter an Integer) b=InputBox(Enter an Integer) Text1.Text=b+aEnd Sub程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是 （49） 。（49）A）108B）18C）810D）出错20、执行语句S=Mid(Visual Basic,5,8)后，S的值是 （50） 。（50）A）VisualB）BasicC）al BasicD）321、在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Private Sub Command1_Click() A$=初学英语先学26个英语字母 Print Len(A$)End Sub程序运行后，单击命令按钮，窗体上显示的是 （51） 。（51）A）24B）13C）12D）2622、假设在当前模块中Option Base被设为0（缺省设置），则数组声明语句：Dim a(-2 to 2,5)中，数组a包含的元素个数为 （52） 。（52）A）120B）30C）60D）2023、有一个如下的Function过程：Function result(n) t=0 For i=1 to n t=t+i Next i result=tEnd Function此过程的功能是 （53） （53）A）计算n!B）计算0*1+1*2+2*3+(n-1)*nC）计算1+2+3+4+nD）计算0*1*2*3*n24、有VB表达式：Int(198.555*100+0.5)/100，其值为 （54） 。（54）A）198B）199.6C）198.56D）20025、在窗体画一个命令按钮，编写如下程序：Private Sub Command1_Click() Dim A As Integer,B as Integer A=10 B=4 Print AB;A mod BEnd sub程序运行后，单击命令按钮，输出的结果是 （55） 。（55）A）2.5 2B）2.5 2.5C）2 2.5 D）2 2试题三、程序阅读选择题（每个选项2分，共30分）。考生从提供的答案中选择一个正确的，并把所选答案的字母填入答题卡对应栏内。1、下面程序的功能是：采用冒泡法升序排序。请在_处选择正确的答案将程序补充完整。Private Sub Form_Click() Dim a,i%,n%,j% a=Array(1,51,6,4,13,23,26,31,5) n= （56） For i=0 To n-1 For j=0 To n-1-i If a(j)a(j+1) Then （57） （58） a(j+1)=t End If Next j Next i For i=0 To （59） 输出排序后的数 Print a(i) Next iEnd Sub（56）A）UBound(a)B）Bound(a)C）Len(a) D）Int(a)（57）A）t=a(j+1)B）t=a(j)C）a(j+1)=tD）a(j)=t（58）A）a(j+1)=a(j)B）t=a(j+1)C）a(j)=a(j+1)D）t=a(j)（59）A）n+1B）n-1C）nD）i2、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下一个For循环过程，m是循环变量，n是计算程序运行时循环的次数，当m值大于21时跳出循环，最后把计算的循环次数n值在文本框中显示出来。请在_处选择正确的答案将程序补充完整。Private Sub command1_Click() Dim m As Integer,n As Integer For m=-21 To 30 m=m+4 n=n+1 If m21 Then （60） （61） Text1.Text=Str( （62） )End Sub（60）A）LoopB）Exit ForC）NextD）Again（61）A）NextB）End ForC）Next ForD）Exit For（62）A）mB）m+1C）n+1D）n3、下面子过程PWord的功能是：统计输入的文章中单词数，并将出现的定冠词The全部去除，同时统计删除定冠词的个数。假定单词以一个空格间隔。请在_处选择正确的答案将程序补充完整。Private Sub Command1_Click() Dim a$,m%,n% a=InputBox(输入一段文章) Call PWord(a,m,n) 调用子过程 Print单词数=;m,The数=;n Print a 输出去除The后的文章字串End SubPublic Sub PWord(s$,CountWord%,CountThe%) Dim i%,st$ CountWord=o:CountThe=0 st=Trim(s) 去除文章字串首尾空格 i= （63） 计算单词间空格间隔出现的位置 Do While i0 CountWord=CountWord+1 st= （64） 去除文章字串首单词后的字串 i=InStr(st,) Loop CountWord=CountWord+1 st=Trim(s) 去除文章字串首尾空格 i= （65） 计算定冠词The出现的位置 Do While i0 CountThe=CountThe+1 ST= （66） 依次去除文章字串中的定冠词The i=InStr(st,The) Loop （67） 返回删除The后的文章字串End Sub（63）A）InStr(st,)B）InStr(st,)C）Mid(st,)D）Mid(st,)（64）A）Mid(st,i)B）Mid(st,i+1)C）Mid(st,i+2)D）Mid(st,i-1)（65）A）Mid(st,The)B）InStr(st,The)C）InStr(st,The)D）Mid(st,The)（66）A）Left(st,i)