VB省二级笔试试题及答案文档格式.docx
- 文档编号:21718310
- 上传时间:2023-01-31
- 格式:DOCX
- 页数:10
- 大小:21.50KB
VB省二级笔试试题及答案文档格式.docx
《VB省二级笔试试题及答案文档格式.docx》由会员分享,可在线阅读,更多相关《VB省二级笔试试题及答案文档格式.docx(10页珍藏版)》请在冰豆网上搜索。
A)视图B)窗口C)文件D)编辑
12.VisualBasic过程的编写是在中进行的。
A)窗体窗口B)工程资源管理器窗口
C)属性窗口D)代码编辑窗口
13.在VisualBasic中,声明全局变量应该用关键字。
A)DimB)PrivateC)StaticD)Public
14.符合“见名知义”命名规则的“年龄”变量名是。
A)PMONTHB)PAGEC)PBIRTHD)PNUM
15.仅删除字符串尾部空格的函数是。
A)Ltrim()B)Trim()C)Rtrim()D)Mid()
16.下列关于数据类型转换的描述,正确的是。
A)所有数据的类型都可以相互转换B)一些数据的类型可以自动转换
C)字符串可以完整转换为数值D)字符只能转换成ASCII码
17.在VisualBasic表达式中,运算符的运算顺序为。
A)算术运算符→字符运算符→关系运算符→逻辑运算符
B)逻辑运算符→关系运算符→字符运算符→算术运算符
C)字符运算符→算术运算符→关系运算符→逻辑运算符
D)关系运算符→逻辑运算符→算术运算符→字符运算符
18.能产生1到7之间随机整数(包括1和7)的表达式为。
A)Rnd*7B)Int(Rnd*8)+1C)Rnd*8+1D)Int(Rnd*7+1)
19.若X为实数,下列函数调用可能产生错误的是。
A)Exp(x)B)Sgn(x)C)Sqr(x)D)Int(x)
20.下列正确的赋值语句是。
A)Z=B*B-4*CB)S/=R*RC)X-Y=2.17D)4Z=Y+38
21.不能使用Print方法输出信息的对象是。
A)文本框B)图片框C)窗体D)打印机
22.下列能够正确输出“a=8”形式的语句是。
A)Printa=3+5B)Print“a=”;
3+5
C)Print“a=3+5”D)Printa=;
3+5”
23.在OptionBase1语句后,正好可以存放1个4*3矩阵的数组定义语句是。
A)Dima(-2To0,2)AsIntegerB)Dima(3,2)AsInteger
C)Dima(4,3)AsIntegerD)Dima(-1To-4,-1To-3)AsInteger
24.在程序运行时,可实现信息输入的控件是。
A)窗口B)单项按钮C)图片框D)标签
25.确定控件在窗体上位置的属性是。
A)Width和HeightB)Width和TopC)Top和LeftD)Top和Height
26.要使文本框可以显示多行文本,需设置属性为True.
A)EnabledB)MultilineC)MaxLengthD)Locked
27.要把一个命令按钮设置成不可见,应设置其Visible属性值为。
A)TrueB)FalseC)DefaultD)Cancel
28.窗体上有一个列表框控件Listl,其中含有若干列表项,则能表示当前被选中的列表项内容。
A)Listl.ListB)Listl.ListIndexC)Listl.IndexD)Listl.Text
29.若要取消窗体的最大化按钮,需要设置它的属性值为False.
A)AutoRedrawB)MinButtonC)EnabledD)MaxButton
30.若要求在单行文本框中输入密码时只显示*号,则应在该文本框的属性窗口中设置。
A)Text属性值为*B)Caption属性值为*
C)PasswordChar属性值为*D)PasswordChar属性值为True
31.要清除PictureBox控件中的图形,可用语句。
A)Picture1.Picture=LoadPicture()B)Picturel.Picture=””
C)Picture1.Picture=LoadPicture(“”)D)KillPicturel.Picture
32.若要使命令按钮具有快捷键的功能,应在Caption属性值的快捷字符前添加字符。
A)#B)@C)&
D)*
33.在VisualBasic的控件数组中,用于标识控件数组各个元素的参数是。
A)TagB)IndexC)ListIndexD)Name
34.下列控件中,不能改变大小的控件是。
A)TextBoxB)LabelC)FrameD)Timer
35.若要改变窗体的标题内容,应设置该窗体属性的值。
A)CaptionB)FontC)NameD)Text
36.在VisualBasic中,菜单控件只有事件。
A)MouseUpB)MouseDownC)ClickD)DblClick
37.如果要在菜单中添加一个分隔线,则应将其“标题”设置为。
A)=B)*C)&
D)-
38.下列不能直接通过VisualBasic语句访问的数据文件是。
A)顺序文件B)随机文件C)数据库文件D)二进制文件
39.下列不属于VisualBasic数据库访问技术的是。
A)DAOB)SQLC)RDOD)ADO
40.下列叙述中错误的是。
A)注释语句是非执行语句,仅对程序的有关内容起注释作用,它不被解释或编译
B)注释语句可以放在代码中的任何位置
C)注释语句不能放在续行符的后面
D)代码中加入注释语句的目的是提高程序的可读性
二、填空题(每空2分,共20分)
1.VisualBasic工程文件的扩展名是。
2.VisualBasic的三种工作模式是设计、运行和。
3.表达式Abs(-34)+Sqr(100)*Int(-3.4)的值为。
4.代数式
的VisualBasic表达式是。
5.在VisualBasic中所有的控件对象必须建立在上,它是所有控件的容量。
6.Label控件的Caption和默认的属性值相同。
7.在VisualBasic中,若数组作为被调用过程的参数,则只能通过方式进行传递。
8.以下程序实现每次单击按钮Command1时,标签Label1在窗体Form1中向右移动100个标准单位;
当标签移出窗体右边界时,再次单击Command1,标签Label1回到窗体的左边界。
PrivateSubCommand1Click()
IfLabel1.Left>
Form1.WidthThen
Else
EndIf
EndSub
9.以下程序的功能是:
把当前目录下的顺序文smtext.txt的内容读入内存,并在文本框Text1中显示出来。
DiminDataAsString
Text1.Text=””
Open”smtext.txt”ForInputAs#1
DoWhile。
Input#1,inData
Text1.Text=Text1.Text&
inData
Loop
Close#1
三、阅读理解题(每小题4分,共20分)
1.执行下面过程后,窗体上显示的是。
PrivateSubFormClick()
DimxAsInteger
X=2
SelectCasex
Case1,3
Print”分支1”
CaseIs>
4
Print”分支2”
CaseElse
Print“Else分支”
EndSelect
2.执行下面过程后,窗体上显示的是。
Dimxa(10,10)AsInteger
DimiAsInteger,jAsInteger
Fori=1To10
Forj=1To10
a(i,j)=i*j
Nextj
Nexti
Printa(2,2)+a(3,3)
3.执行下面过程后,窗体上显示的是。
OptionBase1
PrivateSubFormClick()
DimaAsVariant
DimiAsInteger,sumAsInteger,xAsSingle
a=Array(1,2,3,4,5)
Sum=0
Fori=1To5
Sum=Sum+a(i)
x=Sum/5
Ifa(i)>
xThenPrinta(i)
4.程序运行后,单击两次Command1按钮后,窗体上显示的是。
StaticxAsInteger
DimiAsInteger,yAsInteger
Cls
Fori=1To2
y=y+x
x=x+2
Printx,y
5.执行下面过程后,窗体上显示的是。
PrintPd(4)
FunctionPd(ByValyAsInteger)AsLong
Ify=1Then
Pd=1
Pd=y*Pd(y-1)
EndFunction
四、编程题(共20分)
1.编写程序,分别用InputBox函数接收两个整数,在窗体中输出其中的较大数。
(6分)
2.编写一个通用(或子程序)过程area,以实型变量r作为形参,计算并在过程中输出圆的面积。
(7分)
3.电力公司为合理调配某社区用电高峰,拟对该社区的居民户每月用电情况进行统计。
设定每隔50度用量为一个统计区间,当大于等于500度时为一个统计区间(即0-49、50-99、100-149、…..、450-499、500以上)。
试编程统计每个用电区间的居民户数。
要求:
1)输入的用电量为整数;
2)输入负数时结束数据输入。
参考答案:
一、选择题:
1—5:
ADCBA;
6—10:
CDACB;
11—15:
ADDBC;
16—20:
BADCA;
21—25:
ABCBC;
26—30:
BBDDC;
31—35:
ACBDA;
36—40:
CDCBB
二、填空题:
1.*.vbp
2.中断模式
3.-6
4.abd(a+b)/(a*b)
5.窗体
6.名称
7.传址
8.Label1.left=0;
Label1.left=Label1.left+100
9.Noteof
(1)
三、阅读理解题:
1.Else分支
2.13
3.45
4.810
5.24
四、编程题
1.PrivateSubForm_Load()
DimxAsInteger,yAsInteger
x=Val(InputBox("
请输入第一个整数:
"
))
y=Val(InputBox("
请输入第二个整数:
Ifx>
=yThen
Printx
Else
Printy
EndIf
2.Privatesubarea(rassingle)
Print3.14159*r^2
Endsub
3.PrivateSubCommand1_Click()
DimxAsInteger,kAsInteger
Dima(11)AsInteger
x=0:
k=0
DoWhilex>
=0
k=k+1
请输入第"
&
k&
"
用户用电数"
SelectCasex
Case0To49
a
(1)=a
(1)+1
Case50To99
a
(2)=a
(2)+1
Case100To149
a(3)=a(3)+1
Case150To199
a(4)=a(4)+1
Case200To249
a(5)=a(5)+1
Case250To299
a(6)=a(6)+1
Case300To349
a(7)=a(7)+1
Case350To399
a(8)=a(8)+1
Case400To449
a(9)=a(9)+1
Case450To499
a(10)=a(10)+1
CaseIs>
=500
a(11)=a(11)+1
EndSelect
Loop
Print"
每个用电区间内的居民户数统计如下:
0-49"
"
50-99"
100-149"
150-199"
200-249"
_
250-299"
300-349"
350-399"
400-449"
450-499"
500以上"
Fori=1To11
Printa(i),
Nexti
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 二级 笔试 试题 答案