parlak二级理论题及解答.docx
- 文档编号:9704006
- 上传时间:2023-05-20
- 格式:DOCX
- 页数:37
- 大小:224.21KB
parlak二级理论题及解答.docx
《parlak二级理论题及解答.docx》由会员分享,可在线阅读,更多相关《parlak二级理论题及解答.docx(37页珍藏版)》请在冰点文库上搜索。
parlak二级理论题及解答
1.VisualBasic是一种面向对象的可视化程序设计语言,采取了_D_。
A.按模块顺序执行B.按过程顺序执行C.从主程序开始执行D.事件驱
2.表达式_A_可以计算整型变量x的位数。
A.Len(Trim(Str(Abs(x))))B.Len(Abs(x))-1C.Len(Abs(x))D.Len(Trim(Int(x)))
3.以下叙述中错误的是_B_。
C.移动鼠标时,会触发MouseMove事件
A.双击鼠标可以触发DblClick事件D.控件的名称可以由编程人员设定B.窗体或控件的事件的名称可以由编程人员确定
4.VisualBasic中的对象有三大要素,不属于三大要素的是_A_。
A.时间B.属性C.方法D.事件
5.Timer控件的Interval属性的单位是_A_。
A.千分之一秒B.秒C.0.01秒D.0.1秒
6.程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是_C_。
A.MouseDownB.MouseUpC.LoadD.Click
7.在设计阶段,当双击窗体上的某个控件时,所打开的窗口是_C_。
A.工程资源管理器窗口
B.工具箱窗口
C.代码窗口
D.属性窗口
8.函数InStr(1,"windowse",Mid("winnt",2,2))的返回值是_C_。
A.0B.1
C.2D.3
9.如下数组声明语句,正确的是_D_。
A.Dima[2,4]AsInteger
B.Dima(24)AsInteger
C.Dima(n:
n)AsInteger
D.Dima(2,4)AsInteger
10.已知A="12345678",则表达式Val(Left(A,4)+Mid(A,4,2))的值为_B_。
A.123456B.123445
C.8D.6
11.当使用通用对话框进行打开文件的操作时,如果要指定搜索三类文件(TXT/DAT/DOC),则对通用对话框的正确设置是_C_。
A.设置其Filter属性为:
allfiles*.*|(*.txt)|(*.dat)|(*.doc)
B.设置其Filter属性为:
(*.txt)|(*.dat)|(*.doc)
C.设置其Filter属性为:
TXT|*.txt|DAT|*.dat|DOC|*.doc
D.设置其Pattern属性为:
(*.txt)|(*.dat)|(*.doc)
12.如下数组声明语句,则数组a包含元素的个数有_A_。
Dima(3,-2to2)
A.20B.12
C.13D.15
13.函数Int(Rnd*10)+20的值范围是_C_。
A.[0,20]区间内的整数
B.(0,20)区间内的整数
C.[20,30)区间内的整数
D.(20,30)区间内的整数
14.给窗体、图片框或图像框装入图像可以使用的函数是_C_。
A.LoadImageB.PictureLoad
C.LoadPictureD.ImageLoad
15.以下对象可作为容器控件的是_B_。
A.列表框B.框架
C.文本框D.组合列表框
16.下列程序,运行时,第三次单击窗体后,输出的结果是_C_。
PrivateSubForm_Click()
StaticaAsInteger
Ifa=0Then
a=a+1
Else
a=a+2
EndIf
Printa
EndSub
A.3B.4
C.5D.6
17.所有控件都具有的属性是_B_。
A.TextB.Name
C.ForeColorD.Caption
18.在代码窗口内将Form1的Caption属性设置为"时钟",正确的书写形式是_B_。
A.Form1.Caption"时钟"
B.Form1.Caption="时钟"
C.Caption=“时钟”
D.Fopm1.Caption("时钟")
19.Label控件中的文字对齐方式由_A_属性决定。
A.AlignmentB.WordWrap
C.AutoSizeD.Style
20.下列叙述中正确的是_D_。
A.局部变量的作用域可以超过所定义的过程
B.在调用此过程中,所有局部变量被系统化为0或空字符串
C.在窗体的Form_Load事件过程中定义的变量是全局变量
D.在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名
21.利用VB设计程序的基本步骤可分四步:
第一步是设计用户界面;第二步是_A_;第三步是运行调试程序;第四步是生成可执行文件。
A.编写代码B.设计算法
C.信息反馈D.系统集成
22.在VB中,执行“DimstrBAsDouble”语句后,strB的数据类型为A__。
A.双精度型B.布尔型
C.字符型D.字节型
23.设计动画时通常使用时钟控件,其_A_属性可以控制动画的速度。
A.EnableB.Interval
C.TimerD.Move
24.为了使命令按钮(名称为Command1)右移200,应使用的语句是_C_。
A.Command1.Move-200
B.Command1.Move200
C.Command1.Left=Command1.Left+200
D.Command1.Left=Command1.Left-200
25.将文本框控件的A_属性设置为False,可正常显示文本但不可编辑。
A.LockedB.Edit
C.MultiLineD.Visible
1.下列表达式中能从当前时间中取出秒数的表达式有_CD___。
A.Second(Date)B.Second
C.Second(Time) D.Second(Now)
E.Second(Year)
2.下列控件中不能获得焦点的控件有_BCE___。
A.文本框TextBox
B.框架Frame
C.标签Label
D.命令按钮CommandButton
E.计时器Timer
3.下列选项中属于窗体的属性有_ABD___。
A.BackColorB.Caption
C.TextD.Visible
E.Cls
4.Shape控件不能绘制的图形有_AD___。
A.五角形B.圆角正方形
C.圆角长方形 D.三角形
E.椭圆
5.不属于VB关系运算符的有AC____。
A.!
=B.<=
C.== D.<>
E.=
1.For...Next循环里可以再放另一个循环是允许的。
T
2.用于获得字符串长度的函数是StrLen()。
H
3.属性是用来描述和反映对象特征的参数,对象的属性既可以在属性窗口中设置,又可以在程序代码中设置。
T
4.设置框架的Enabled属性为False,框架内的所有对象均被禁用。
T
5.只能用来显示字符信息而不能进行编辑的控件是文本框。
H
6.VB中能加载对象的方法是Visible。
H
7.VB的Double类型数据,可以精确表示其数值范围内的所有实数。
T
8.VB是一种面向过程的程序设计语言。
H
9.注释语句可以使用单引号或Rem,被注释的语句也可被执行。
H
10.可以利用Shape控件的Shape属性画圆角正方形。
T
1.PrivateSubCommand1_Click()
Dima,bAsString
DimiAsInteger
a="abcdefghijklmn"
Fori=1ToLen(a)Step3
b=Mid(a,i,1)&b
Nexti
Printb
EndSub
执行上面程序段后,所输出的内容为__mjgda__。
(注意:
答案必须用西文半角字母填写,要区分大小写字母,且不能出现空格和多余字符!
)
2.下面的程序在命令按钮单击后产生10000个1到10之间的随机整数,然后由数组a中的10个元素分别统计每一个数出现的次数,其中a
(1)统计1出现的次数,a
(2)统计2出现的次数,依次类推;最后在窗体中输出统计结果,请将程序补充完整。
(注意:
答案必须用半角字符填写,要区分大小写字母,且不能出现空格和多余字符!
)
PrivateSubCommand1_Click()
Dima(1To10)AsInteger
DimiAsInteger,kAsByte
Fori=1To10000
k=Int(Rnd*10)+1
a(k)=a(k)+1
Nexti
Fork=1To10
Printk&"出现了"&__a(k)_____&"次"
Nextk
EndSub
3.在窗体中添加一个定时器控件Timer1,并将其间隔设成5。
程序启动后将窗口最大化,并将背景色设成黑色;然后在Timer事件中,在窗口的不同位置用不同颜色、不同大小画点。
请将程序补充完整。
PrivateSubForm_Load()
Me.BackColor=vbBlack
Me.WindowState=2
EndSub
PrivateSubTimer1__timer______()
Me.DrawWidth=Rnd*10+5
Me.ForeColor=256^3*Rnd
Me.PSet(Me.ScaleWidth*Rnd,Me.ScaleHeight*Rnd)
EndSub
4.Dima(5,-2To1,2To3)AsByte
一个Byte类型数据在内存中占1个字节,则上面数组在内存中占__48__字节。
(注意:
答案必须用半角阿拉伯数字填写,且不能出现空格、小数点和多余字符!
)
5.Ifx^2<=8Then
y=x^3
ElseIfx*3<=11Then
y=x*2
Else
y=x*3
EndIf
Me.Printy
若x=3,则以上程序段输出结果为__6__。
(注意:
答案必须用半角阿拉伯数字填写,且不能出现空格、小数点和多余字符!
)
6.PrivateSubCommand1_Click()
Dima,b,cAsString
a="长江"
b="黄河"
c="松花江"
x=InputBox(a+Left(b,1),b+Left(c,1),c+Left(a,1))
EndSub
当运行上面程序段时,InputBox的默认值为_松花江长___。
(注意:
答案中不能出现空格和多余字符!
)
7.int(Rnd*6+2^0)
上面表达式的最大值为___6_。
(注意:
答案必须用半角阿拉伯数字填写,且不能出现空格、小数点和多余字符!
)
8.VB中控制TextBox控件的文字颜色,要设置的属性是________。
(注意:
答案必须用西文半角小写字母填写,且不能出现空格、小数点和多余字符!
)
9.在窗体上绘制点,要使用窗体的_pset___方法。
(注意:
答案必须用西文半角小写字母填写,且不能出现空格、小数点和多余字符!
)
10.a="abcde"
b=Mid(a,3,2)+Left(a,Len(a))
上面变量b的值为_cdabcde___。
(注意:
答案必须用西文半角字母填写,要区分大小写字母,且不能出现空格和多余字符!
)
单击考试系统界面左下角的VisualBasic图标,启动VisualBasic。
打开考试文件夹下的工程文件project11.vbp,在窗体Form1中完成下列操作:
如图所示,设计一个画图应用程序。
其中:
窗体的标题为"画图"。
在窗体上画一个形状控件,其名称为Shape1,高和宽均为2000;再画两个命令按钮Command1、Command2,标题分别为"正方形"、"圆",单击这两个命令按钮时,在Shape1上分别画出"正方形"、"圆"。
注:
本题中工程文件名为project11.vbp,工程名为工程1,窗体文件名为Form11.frm,窗体名为Form1。
单击考试系统界面左下角的VisualBasic图标,启动VisualBasic。
打开考试文件夹下的工程文件project12.vbp,在窗体Form1中完成下列操作:
如图所示,设计一个剪切板应用程序。
其中:
窗体的标题为"剪切板"。
在窗体上画一个标签Label1,标题分别为"剪切板测试",字号为四号,标签能自动调整大小以显示所有的内容;再画一个文本框Text1,字号为四号;再画一个命令按钮Command1,标题为"复制",单击命令按钮时,利用剪切板将标签Label1中的标题字符复制粘贴到文本框Text1中(代码中除了Clipboard外,不能使用其它变量)。
注:
本题中工程文件名为project12.vbp,工程名为工程1.
1.PrivateSubCommand1_Click()
DimxAsString,yAsString
DimiAsByte
x="abcdefghijklmn"
Fori=1ToLen(x)Step4
y=y&Mid(x,i,1)
Nexti
Printy
EndSub
执行上面程序后,在窗体中输出的内容是_aeim___。
(注意:
答案必须用西文半角字母填写,要区分大小写字母,且不能出现空格和多余字符!
)。
2.有一个N+1行M列的二维数组,要求由健盘输入前N行M列的数据,由程序计算出每一列的和并放在第N+1行的对应列上,最后将这N+1行M列的二维数组按行列进行打印输出。
(注意:
答案必须用西文半角字母填写,要区分大小写字母,且不能出现空格和多余字符!
ConstN=3,M=4
PrivateSubCommand1_Click()
DimH%,L%,A(1ToN+1,1ToM)AsInteger
ForL=1ToM
ForH=1ToN
A(H,L)=Val(InputBox(H&"行"&L&"列:
"))
A(N+1,L)=A(N+1,L)+A(H,L)
NextH
NextL
ForH=1ToN+1
ForL=1ToM
PrintTab(L*5);_A(H,L)________;
NextL
Print:
NextH
EndSub
3.下面程序的功能是查找某个字符串在指定的文件中是否出现。
要求是:
单击命令按钮Command1之后,由公共对话框CommonDialog1显示一个打开对话框,选择一个Txt文件之后将其打开并读出全部内容;输入要查找的字符串后进行查找;若找到,则输出“找到字符串”,否则输出“没找到字符串”。
请将下列程序补充完整。
(注意:
答案必须用西文半角字母填写,要区分大小写字母,且不能出现空格和多余字符!
)
PrivateSubCommand1_Click()
DimAAsString,BAsString,YAsInteger
A=InputBox("请输入要查找的字符串")
CommonDialog1.Filter="*.Txt|*.Txt"
CommonDialog1.ShowOpen
OpenCommonDialog1.Filename__________ForInputAs#1
B=Input(LOF
(1),#1)
Close#1
Y=InStr(1,B,A)
IfY<>0Then
Print"找到字符串";A
Else
Print"没找到字符串";A
EndIf
EndSub
4.Dima(4,-1To3,2To10)AsLong
一个Long类型的变量在内存中占4个字节,则上面数组在内存中占_900___字节。
(注意:
答案必须用半角阿拉伯数字填写,且不能出现空格、小数点和多余字符!
)。
5.Ifx<0Then
y=x^2
ElseIfx<=5Then
y=x^3
Else
y=-x^2
EndIf
Printy
若x的值为6,则以上程序段输出的结果为_-36___。
(注意:
答案必须用半角阿拉伯数字填写,且不能出现空格、小数点和多余字符!
)。
6.PrivateSubCommand1_Click()
Dimx$,y$,z$
x="新疆"
y="美丽"
z="家乡"
MsgBoxx+y,vbYesNo,y+z
EndSub
执行上面程序后,所弹出的消息框的提示内容Prompt是_新疆美丽___。
(注意:
答案中不能出现空格和多余字符!
)。
7.Fix(-3.56)+Abs(-6)
上面表达式的值为_3___。
(注意:
答案必须用半角阿拉伯数字填写,且不能出现空格、小数点和多余字符!
)。
8.Label控件的Autosize____属性可以设置自动调整其边框的尺寸大小(注意:
答案必须用西文半角小写字母填写,且不能出现空格、小数点和多余字符!
)。
9.通过代码要删除组合框中的指定项目,得使用组合框的__Removeitem__方法(注意:
答案必须用西文半角小写字母填写,且不能出现空格、小数点和多余字符!
)。
10.a="abcd"
b=Right(a,2)&Left(a,2)&a
则变量b的值为_cdababcd___。
(注意:
答案必须用西文半角字母填写,要区分大小写字母,且不能出现空格和多余字符!
)。
单击考试系统界面左下角的VisualBasic图标,启动VisualBasic。
打开考试文件夹下的工程文件project11.vbp,在窗体Form1中完成下列操作:
如图所示,设计一个字符演示应用程序。
其中:
窗体的标题为"字符演示"。
在窗体上画一个标签Label1,标题为"程序设计",使标签能自动调整大小以显示所有的内容;再画一个命令按钮Command1,标题为"放大"。
要求:
单击窗体,则可使标签Label1移到窗体的左上角;单击Command1命令按钮,则使标签Label1中的字体大小扩大到原来的2倍(代码中不能用变量)。
注:
本题中工程文件名为project11.vbp,工程名为工程1,窗体文件名为Form11.frm,窗体名为Form1。
单击考试系统界面左下角的VisualBasic图标,启动VisualBasic。
打开考试文件夹下的工程文件project12.vbp,在窗体Form1中完成下列操作:
如图所示,设计一个字符复制应用程序。
其中:
窗体的标题为"字符复制"。
在窗体上画两个文本框Text1、Text2,字号为四号,高度为495,宽度为2000,文本框Text1中的文本为"程序设计"。
单击文本框Text1时,文本框Text1中的内容被全选,并利用剪切板将选择的字符复制粘贴到文本框Text2中(代码中除了Clipboard外,不能使用其它变量)。
注:
本题中工程文件名为project12.vbp,工程名为工程1,窗体文件名为Form12.frm,窗体名为Form1。
1.用_B_关键字声明的模块级变量可以在其它模块中使用。
A.Dim B.Public
C.Static D.Private
2.设有如下程序:
PrivateSubForm_Click()
Dima(10),P(3)AsInteger
k=0
Fori=1To10
a(i)=i
Nexti
Fori=1To3
P(i)=a(10-2*i)
Nexti
Fori=1To3
k=k+P(i)
Nexti
Printk
EndSub
程序运行后,单击窗体,则在窗体上显示的是_D_。
A.7 B.6
C.19 D.18
3.如果系统日期正确,那么在立即窗口中执行以下操作,最后输出的结果是_C_。
(
x=#2002/12/25#
y=date
printx
A.-1 B.0
C.False D.True
4.在窗体中添加一个名称为Command1的命令按钮,然后编写如下代码:
PrivateSubCommand1_Click()
x=0
DoUntilx=-1
a=Val(InputBox("请输入A的值"))
b=Val(InputBox("请输入B的值"))
x=Val(InputBox("请输入X的值"))
a=a+b+x
Loop
Printa
EndSub
程序运行后,单击命令按钮,依次在输入对话框中输入
1
A.8 B.9
C.14 D.15
5.当执行下面语句后,A和B的值依次为_B_。
A=1
B=2
A=A+B:
B=A-B:
A=A-B
A.1和2 B.2和1
C.1和1 D.2和2
6.若要使某个命令按钮成为窗体的取消按钮(即能用Esc键直接选择),应将其_C_属性值设置为True。
A.DefaultB.Value
C.CancelD.Ok
7.在窗体中添加一个文本框(其Name属性为Text1),然后编写如下代码:
PrivateSubForm_Click()
DimsAsString
Fori=1To5
s=s+IIf(iMod3=1,CStr(i),"0")
Nexti
Text1.Text=s
EndSub
上述程序运行后,单击窗体,则Text1的内容是_D_。
A.5 B.14
C.出错 D.10040
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- parlak 二级 理论 解答