江西省考2010二级VB试卷及答案
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)AB B)BC C)AC D)BD
7、微型计算机中,内存储器比外存储器  (7)  。
(7)A)存储容量大 B)读写速度快 C)运算速度慢 D)以上三项都对
8、某人的在到达时,若他的计算机没有开机,则邮件  (8)  。
(8)A)退回给发件人  B)开机时对方重发
C)存放在服务商的E-mail服务器 D)该邮件丢失
9、的传输协议是  (9) 
(9)A)DHCP B)FTP C)SMTP D)CMIP
10、计算机病毒是一种  (10)  。
(10)A)生物病毒  B)外部设备
C)游戏软件  D)人为编制的特殊程序
11、WinRAR是一个  (11)  软件。
(11)A)压缩软件  B)解压缩软件
C)压缩和解压缩软件 D)安装工具软件
12、ASCII码中的每个字符都可以用二进制数来表示,例如A表示为01000001,B表示为01000010,那么字符F可表示为  (12)  。
(12)A)0100011 B)01000111
C)01000101 D)01000110
13、在Windows XP中,回收站的作用是  (13)  。
(13)A)保存文件碎片 
B)存放被删除的文件
C)保存被复制的文本
D)保存被剪切的文本
14、Windows XP中,在"资源管理器"窗口中一次选中多个连续的文件可以先按住  (14)  键,再用鼠标选取。
(14)A)Alt B)Ctrl
C)Tab D)Shift
15、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+Del 
B)Ctrl+Shift+Del
C)Shift+Alt+Enter 
D)Shift+Alt+Del
18、在Windows XP中,单击对话框中的"确定"按钮与按  (18)  键的作用是一样的。
(18)A)Esc B)Enter
C)F1 D)F2
19、当选定了某项内容并单击"剪切"→"粘贴"菜单后,剪贴板中的内容为  (19)  。
(19)A)空 B)文本片段 C)目标处的内容 D)剪切下来的内容
20、下列汉字输入法中,  (20)  不存在重码。
(20)A)区位码 B)微软拼音输入法 C)智能ABC D)智能五笔
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)Undo B)Noname C)用户1 D)文档1
25、在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)ESC B)Alt C)F5 D)Ctrl+Q
29、在一张幻灯片中,若对一幅图片及文本框设置成一致的动画显示效果时,则以下  (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.Hide B)Form1.Cls
C)Form1.Show D)Form1.Print
3、下面程序运行后,显示的结果是  (33) 
  Dim x%
  If x Then Print x+1 Else Print x
(33)A)1 B)0
C)2 D)显示错误信息
4、在VB 6.0集成开发环境中,不包括  (34)  窗口。
(34)A)DOS界面 B)窗体
C)代码 D)属性
5、单选按钮的名称是  (35)  。
(35)A)ComboBox 
B)CommandButton
C)PictureBox 
D)OptionButton
6、工具箱中的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 x
  x=Int(Rnd)+5
  Select 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(x>y,x,y) B)If x>y Rhen Max=x Else Max=y
C)Max=x:If Y>=x Max=y D)If Y>=x Max=y:Max=x
10、下面的VB程序段的运行结果是  (40)  。
For i=3 To 1Step -1
Print Spc(5-i)
For j=1 To 2*i-1
Print"$"
Next j
Print
Next i
(40)A)$ B)$$$$$ C)$$$$$ D)$$$$$
    $$$ $$$ $$$ $$$
    $$$$$ $
    $ $
11、Visual Basic窗体文件的类型是  (41)  。
(41)A).frm B).bat
C).bas D).cls
12、以下能判断是否到达文件尾的函数是  (42)  。
(42)A)BOF B)ASC
C)New D)EOF
13、下列VB程序段的执行结果为  (43)  。
A=0:B=1
A=A+B:B=B+A:Print A;B
A=A+B:B=B+A:Print A;B
(43)A)1  2 B)1  1
C)1  3 D)1  2
3  5 3  5
3  4 3  4
14、设窗体中存在命令按钮Command1,其Click事件代码如下:
Private Sub Command1_Click()
x=2
y=1
If x*y<1 Then y=y-1 Else y=-1
Print y-x>0
End Sub
程序运行后,单击该命令按钮,输出结果为  (44)  。
(44)A)True B)False
C)-1 D)1
15、设a=5、b=6、c=7、d=8,执行下列语句后,x的值为  (45)  。
X=IIf((a>b)And(c>d),10,20)
(45)A)10 B)20
C)True D)False
16、在窗全上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_
Click()
c=1234
c1=Trim(Str(c))
For i=1 To 4
Print___________
Next
End Sub
程序运行后,单击命令按钮,要求在窗体上显示如下内容:
1
12
123
1234
则在下划线处应填入的内容为  (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+a
End Sub
程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是  (49)  。
(49)A)108 B)18 C)810 D)出错
20、执行语句S=Mid("Visual Basic",5,8)后,S的值是  (50)  。
(50)A)Visual B)Basic C)al Basic D)3
21、在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:
Private Sub Command1_Click()
A$="初学英语先学26个英语字母"
Print Len(A$)
End Sub
程序运行后,单击命令按钮,窗体上显示的是  (51)  。
(51)A)24 B)13 网上订票怎么取票
C)12 D)26
22、假设在当前模块中Option Base被设为0(缺省设置),则数组声明语句:Dim a(-2 to 2,5)中,数组a包含的元素个数为  (52)  。
(52)A)120 B)30
C)60 D)20
23、有一个如下的Function过程:
Function result(n)
t=0
For i=1 to n
t=t+i
Next i
result=t
End Function
此过程的功能是  (53) 
(53)A)计算n! 
B)计算0*1+1*2+2*3+...+(n-1)*n
C)计算1+2+3+4+...+n
D)计算0*1*2*3*...*n
24、有VB表达式:Int(198.555*100+0.5)/100,其值为  (54)  。
(54)A)198 B)199.6 段仲仪
C)198.56 D)200
25、在窗体画一个命令按钮,编写如下程序:
Private Sub Command1_Click()
Dim A As Integer,B as Integer
A=10
B=4
Print A\B;A mod B
End sub
程序运行后,单击命令按钮,输出的结果是  (55)  。
(55)A)2.5  2 B)2.5  2.5
C)2  2.5  D)2  2
试题三、程序阅读选择题(每个选项2分,共30分)。考生从提供的答案中选择一个正确的,并把所选答案的字母填入答题卡对应栏内。
1、下面程序的功能是:采用冒泡法升序排序。请在_______处选择正确的答案将程序补充完整。
Private Sub Form_Click()
Di
m 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 i
End 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)=t D)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+1 B)n-1 C)n D)i
2、在窗体上画一个名称为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 m>21 Then  (60) 
(61) 
Text1.Text=Str(  (62)  )
End Sub
(60)A)Loop B)Exit For
C)Next D)Again
(61)A)Next B)End For
退休工资如何计算
C)Next For D)Exit For
(62)A)m B)m+1
C)n+1 D)n
3、下面子过程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 Sub
Public Sub PWord(s$,CountWord%,CountThe%)
Dim i%,st$
CountWord=o:CountThe=0
st=Trim(s)                    '去除文章字串首尾空格
i=  (63)                  '计算单词间空格间隔出现的位置
Do While i>0
CountWord=CountWord+1
st=  (64)              '去除文章字串首单词后的字串
i=InStr(st,"")
Loop
CountWord=CountWord+1
st=Trim(s)                      '去除文章字串首尾空格
i=  (65)                  '计算定冠词The出现的位置
Do While i>0
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)+Mid(st,i+3) B)left(st,i)+Mid(st,i+4)
C)Left(st,i-1)+Mid(st,i+3) D)Left(st,i-1)+Mid(st,i+4)
(67)A)s=i B)s=InStr(st,"The") C)s=st D)s=InStr(st,"")
4、
在窗体上有一个名称为Text1的文本框和一个名称为Command1的命令近钮,然后编写如下事件过程:先定义一个二维数组,然后应用双重循环按一定的规律给该数组赋值。最后要求把数组中某两个值相加后的结果放到文本框中显示出来。请在______处选择正确的答案将程序补充完整。
Private Sub Command1_Click()
Dim  (68)  As Integer          '定义5×5的二维数组Arr,其值为整型数
Dim i As Integer,j As Integer
For i=1 To 5
For j=1 To 5
Arr(i,j)=i+j-1
(68) 
Next i
Text1.Text=  (70)              '把数组中第2行第1列和第5行第4列的值相加放到文本框中
End Sub
(68)A)Arr B)Arr() C)Arr(5,5) D)Arr(1,5)
(69)A)Next i B)Next j C)Next End D)Next For
(70)A)Arr(1,2)+Arr(4,5) B)Arr(2,1)+Arr(4,5) 
C)Arr(2,1)+Arr(5,4) D)Arr(1,2)+Arr(5,4)
试题四、综合应用题(共15分)。考生把答案写在答卷纸对话栏内。
  下图所示的窗体包括一个名称为"计算"的命令按钮和一个文本框Text1。窗体的功能是:单击"计算"命令按钮时,会计算出S=12+32+52+...+492的和,并将结果在文本框中显示出来。请写出命令按钮的Click事件代码。
1、
计算机基础部分(30分)
  1、B    2、C    3、B    4、B    5、D 
  6、A    7、B    8、C    9、C    10、D
11、C  12、D  13、B    14、B  15、A 
16、D  17、A  18、B    19、D  20、A
21、D  22、A  23、B    24、B  25、B 
26、A  27、C  28、A    29、A  30、D
II、程序设计语言部分(70分)
试题二、语言基础选择题(每个选项1分,共25分)。考生从提供的答案中选择一个正确的,并把所选答案的字母填入答题卡对应栏内。
31、A  32、B  33、B  34、A  35、B 
36、D  37、B  38、C  39、D  40、B
41、A  42、D  43、A  44、B  45、B 
46、B  47、B  48、C  49、C  50、C
51、B  52、B  53、C  54、C  55、D 
试题三、程序阅读选择题(每个选项2分,共30分)。考生从提供的答案中选择一个正确的,并把所选答案的字母填入答题卡对应栏内。
56、A  57、B  58、C  59、B  60、B 
61、A  62、D  63、A  64、B  65、C
66、D  67、C  68、C  69、B  70、C 
试题四、综合应用题(共15分)。考生把答案写在答卷纸对话栏内。
Dim i As Integer
Dim sum As Long
For i = 1 To 49 Step 2
sum = sum + i * i
Next i
Text1.Text = "s=" + Str(sum)

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。