二级VISUAL+BASIC分类模拟199.docx
《二级VISUAL+BASIC分类模拟199.docx》由会员分享，可在线阅读，更多相关《二级VISUAL+BASIC分类模拟199.docx（32页珍藏版）》请在冰豆网上搜索。
二级VISUAL+BASIC分类模拟199
二级VISUALBASIC分类模拟199
一、选择题
1、下列标签属性中属于逻辑型的是______。
A．Caption B．BorderStyle
C．Visible D．Name
2、窗体上有一个名为Label1的标签，为了使该标签透明并且没有边框，正确的属性设置为______。
A．Label1.BackStyle=0
Label1.BorderStyle=0
B．Label1.BackStyle=1
Label1.BorderStyle=1
C．Label1.BackStyle=True
Label1.BorderStyle=True
D．Label1.BackStyle=False
Label1.BorderStyle=False
3、设窗体上有一个文本框，名称为Text1，程序运行后，要求该文本框只能显示信息，不能接收输入的信息，以下能实现该操作的语句是______。
A．Text1.MaxLength=0 B．Text1.Enabled=False
C．Text1.Visible=False D．Text1.Width=0
4、窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是______。
PrivateSubCommand1_Click（）
Picture1.Picture=LoadPicture（"c:
\1.jpg"）
Picture1.Cls
Picture1.Print"Test"
EndSub
A．窗体无显示，图片框显示图片和文字Test B．窗体上出现Test文本，图片框无显示
C．窗体上出现Test文本，图片框显示图片1.jpg D．窗体无显示，图片框只显示Test文字
5、以下关于Image控件和PictureBox控件的说明中，错误的是______。
A．Image控件和PictureBox控件都有Picture属性
B．Image控件和PictureBox控件都支持Print方法
C．Image控件和PictureBox控件都可以用LoadPicture函数把图形文件装入控件中
D．Image控件和PictureBox控件都能在属性窗口装入图形文件，也都能在运行期间装入图形文件
6、以下关于图片框控件的说法中，错误的是______。
A．可以通过Print方法在图片框中输出文本
B．清空图片框控件中图形的方法之一是加载一个空图形
C．图片框控件可以作为容器使用
D．用Stretch属性可以自动调整图片框中图形的大小
7、命令按钮不支持的事件是______。
A．Click B．DblClick C．GotFocus D．LostFocus
8、设置复选框或单选按钮标题对齐方式的属性是______。
A．Align B．Style C．Sorted D．Alignment
9、在窗体上画两个单选按钮，名称分别为Option1和Option2，标题分别为“宋体”和“黑体”；一个复选框，名称为Check1，标题为“粗体”；一个文本框，名称为Text1，Text属性为“改变文字字体”。
要求程序运行时，“宋体”单选按钮和“粗体”复选框被选中，则能够实现上述要求的语句序列是______。
A．Option1.Value=True
Check1.Value=False
B．Option1.Value=True
Check1.Value=True
C．Option2.Value=False
Check1.Value=True
D．Option1.Value=True
Check1.Value=1
10、窗体上有一个按钮和一个列表框（Sorted属性为True），执行下列过程后的输出结果为______。
PrivateSubCommand1_Click（）
List1.AddItem"China"
List1.AddItem"Great"
List1.AddItem"Is",1
List1.AddItem"!
",3
PrintList1.List
（2）
EndSub
A．China B．Great C．Is D．!
11、给程序的空白行选择适当的语句。
该程序段的功能是：
依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。
程序如下：
DoWhileList2.ListCount
______
List2.RemoveItem0
Loop
A．List1.AddItemList2.List（0） B．List1.AddItemList2.Text
C．List2.AddItemList1.List（0） D．List2.AddItemList1.Text
12、下列每组控件中，都包含有滚动条的一组控件是______。
A．ListBox和Label B．TextBox和DriveListBox
C．ComboBox和CheckBox D．FileListBox和DirListBox
13、运行下列程序后，显示的结果为______。
R1=21
R2=34
IfR1＜R2ThenPrintR2ElsePrintR1
A．21 B．34 C．55 D．2134
14、如果A为整数且|A|＞=100，则打印"OK"，否则打印"Error"，表示这个条件的单行格式If语句是______。
A．IfIntA.=AAndSqrA.＞=100ThenPrint"OK"ElsePrint"Error"
B．IfFixA.=AAndAbsA.＞=100ThenPrint"OK"ElsePrint"Error"
C．IfIntA.=AAnd（A＞=100,A＜=-100）ThenPrint"OK"ElsePrint"Error"
D．IfFixA.=AAndA＞=100AndA＜=-100ThenPrint"OK"ElsePrint"Error"
15、下列程序的执行结果是______。
a=75
Ifa＞90Theni=4
Ifa＞80Theni=3
Ifa＞70Theni=2
Ifa＞60Theni=1
Print"i=";i
A．i=1 B．i=2 C．i=3 D．i=4
16、有如下程序：
a=1:
b=2:
c=3
a=a+b:
b=b+c:
c=b+a
Ifa＜＞3Orb＜＞3Then
a=b-a:
b=c-a:
c=b+a
EndIf
Printa+b+c
运行后，输出的结果是______。
A．16 B．3 C．6 D．8
17、有一程序段，其功能是：
当x＞0时，y=x；当-2=＜x＜=0时，y=-x,当x＜-2时，产生一个“输入错误”信息框。
则下列程序空白处应为______。
PrivateSubForm_Click（）
x%=InputBox（"请输入x的值:
"）
Ifx＞0Then
y=x
______
y=-x
Else
MsgBox"输入错误"
EndIf
rinty
EndSub
A．Elsex＞=-2Andx＜=0Then B．ElseIfx＞=-2Andx＜=0Then
C．ElseIfx＞=-2Andx＜=0 D．ElseIfx＞=-2Andx＜=0Then
18、执行下面的程序段后，变量c的值为______。
a=29
b=33
SelectCaseb\10
Case0
c=a*10+b
Case1To9
c=a*100+b
Case10To99
c=a*1000+b
EndSelect
Printc
A．29 B．2933 C．33 D．3329
19、下述程序的功能是______。
x="（（a+B.*A.-（a*b+C."
n=Len（x）
m=0
Fork=1Ton
p$=Mid（x,k,1）
Ifp$="（"Then
m=m-1
ElseIfp$="）"Then
m=m+1
EndIf
Nextk
Ifm＞0Then
print":
-（"
Else
print":
-）"
EndIf
A．统计输入的字符串中括号的总数 B．统计输入的字符串中匹配的括号的对数
C．检查输入的字符串中的括号是否能够匹配 D．删除字符串的括号
20、下述程序段中，与其他3个程序段作用不同的是______。
A．s=0
i=0
Whilei＞100
s=s+1
Wend
B．s=0
i=0
Whilei＜100
i=i+1
Wend
C．s=0
DoWhilei＜100
s=s+1
i=i+1
Loop
D．s=0
i=0
DoUntili＞=100
s=s+1
i=i+1
Loop
21、下面的数组声明语句中正确的是______。
A．DimA[3,4]AsInteger B．DimA（3,4）AsInteger
C．DimA[3;4]AsInteger D．DimA（3;4）AsInteger
22、有如下程序：
Dimarr（3,3）
Forj=1To3
Fork=1To3
arr（j,k）=（j-1）*3+k
Nextk
Nextj
Forj=2To3
Fork=2To3
Printarr（k,j）;
Nextk
Print
Nextj
运行程序后，输出的结果是______。
A．2536 B．5869 C．4758 D．5968
23、有如下的程序段：
Dima（4）AsInteger
Dimb（4）AsInteger
Fork=0To2
a（k+1）=Val（InputBox（"Enterdata:
"））
b（3-k）=a（k+1）
Nextk
Printb（k）
程序运行后，依次输入1、3、5，输出的结果是______。
A．1 B．3 C．5 D．0
24、有如下的程序段：
Dimt（10）
Fork=2To10
t（k）=10-k
Nextk
x=6
Printt（2+t（x））
程序运行后，输出结果为______。
A．2 B．3 C．4 D．5
25、设有命令按钮Command1的单击事件过程，代码如下：
PrivateSubCommand1_Click（）
Dima（30）AsInteger
Fori=1To30
a（i）=Int（Rnd*100）
Next
ForEacharrItemIna
IfarrItemMod7=0ThenPrintarrItem;
IfarrItem＞90ThenExitFor
Next
EndSub
对于该事件过程，以下叙述中错误的是______。
A．a数组中的数据是30个100以内的整数
B．语句ForEacharrItemIna有语法错误
C．IfarrItemMod7=0……语句的功能是输出数组中能够被7整除的数
D．IfarrItem＞90……语句的作用是当数组元素的值大于90时退出For循环
26、设有如下程序：
OptionBase0
PrivateSubForm_Click（）
Dima
DimIAsInteger
a=Array（1,2,3,4,5,6,7,8,9）
Fori=0To3
Printa（5-i）;
Next
EndSub
程序运行后，单击窗体，则在窗体上显示的内容是______。
A．4321 B．5432 C．6543 D．7654
二、操作题
27、考生文件夹
在名称为Form1、标题为“标签”的窗体上添加一个名称为Label1的标签，并设置适当属性以满足以下要求。
①标签的标题为“计算机等级考试”。
②标签可根据标题内容自动调整其大小。
③标签带有边框，且标签标题显示为三号字。
程序运行后的窗体如下图所示。
[注意]存盘时必须存放在考生文件夹下，工程文件名保存为zcsj1.vbp，窗体文件名保存为zcsj1.frm。
28、考生文件夹
在名称为Form1的窗体上添加一个标签（名称为Label1，标题为空白，BorderStyle属性为1，Visible属性为False）、一个文本框（名称为Text1，Text属性初始内容为空）和一个命令按钮（名称为Command1，标题为“显示”），如下图1所示。
然后编写命令按钮的Click事件过程。
程序运行后，在文本框中输入“计算机等级考试”，然后单击命令按钮，则文本框消失，并在标签内显示文本框中的内容。
程序运行后的窗体如下图2所示。
要求程序中不得使用任何变量。
图1
图2
[注意]存盘时必须放在考生文件夹下，工程文件名保存为zcsj2.vbp，窗体文件名保存为zcsj2.frm。
29、考生文件夹
在名称为Form1的窗体上添加一个名称为Picture1的图片框（PictureBox），高、宽均为1000mm。
在图片框内再添加一个有边框的名称为Image1的图像框（Image）。
并通过属性窗口把考生文件夹下的图标文件Point11（香蕉图标）装入图像框Image1中，如下图所示。
[注意]存盘时必须存放在考生文件夹下，工程文件名保存为zcsj3.vbp，窗体文件名保存为zcsj3.frm。
30、考生文件夹
在名称为Form1的窗体上添加一个名称为Shape1的形状控件，要求在属性窗口中将其形状设置为椭圆，其短轴（垂直方向）、长轴（水平方向）的长度分别为800mm、1600mm。
把窗体的标题改为“Shape控件”，窗体上无最大化、最小化按钮。
程序运行后的窗体如下图所示。
[注意]存盘时必须存放在考生文件夹下，工程文件名保存为zcsj4.vbp，窗体文件名保存为zcsj4.frm。
31、考生文件夹
在考生文件夹下有一个工程文件zcsj1.vbp，其窗体如下图所示。
该程序用来对在上面的文本框中输入的英文字母串（称为“明文”）加密，加密结果（称为“密文”）显示在下面的文本框中。
加密的方法为：
选中一个单选按钮，单击“加密”按钮后，根据选中的单选按钮后面的数字n，将“明文”中的每个字母改为它后面的第n个字母（“z”后面的字母认为是“a”，“Z”后面的字母认为是“A”）。
窗体中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的?
改为正确的内容。
[注意]不得修改程序中的其他部分和控件的属性，最后将修改后的文件按原文件名存盘。
32、考生文件夹
在考生文件夹下有一个工程文件zcsj2.vbp。
在其窗体中“待选城市”下的List1列表框中有若干个城市名称。
程序运行时，选中List1中若干个列表项（见下图1），单击“选中”按钮则把选中的项目移到List2中，单击“显示”按钮，则在Text1文本框中显示这些选中的城市（见下图2）。
已经给出了所有控件和程序，但程序不完整。
图1
图2
[要求]请去掉程序中的注释符，把程序中的?
改为正确的内容，使其能正确运行，但不能修改程序中的其他部分和控件属性。
最后用原来的文件名保存工程文件和窗体文件。
33、考生文件夹
考生文件夹下的工程文件zcsj3.vbp中有2个初始标题分别为“移动”和“退出”的命令按钮；1个初始状态为不可用的时钟Timer1。
请添加1个标签Label1，其标题为“计算机考试”，字体为黑体小四号字，左边界为500，且能根据显示的内容自动调整大小，如下图所示。
该程序的功能如下。
①单击标题为“移动”的按钮时，该按钮标题自动变换为“暂停”，且标签在窗体中开始向右移动。
当标签右侧到达窗体右界时，标签移动的方向改变为从右向左移动；当标签左侧触及窗体左界时，标签移动的方向改变为从左向右移动，如此反复。
②单击“暂停”按钮时，该按钮的标题自动变换为“移动”，并暂停标签内容的移动。
③单击“退出”按钮，则结束程序的运行。
命令按钮的Click事件过程已经给出，但事件过程不完整，请将其中注释符去掉，把?
改为正确的内容，以实现上述程序的功能。
[注意]不得修改窗体文件中已经存在的控件和程序，最后将修改后的文件按原文件名进行存盘。
34、考生文件夹
在考生文件夹下有一个工程文件zcsj4.vbp，请在窗体上添加两个单选按钮（名称分别为Option1和Option2，标题分别为“添加项目”和“删除项目”）、一个列表框（名称为List1）和一个文本框（名称为Text1），如图1所示。
编写窗体的Click事件过程。
程序运行后，如果选择“添加项目”单选按钮，然后单击窗体，则从键盘上输入要添加的项目内容（内容任意，不少于三个），并添加到列表框中；如果选择“删除项目”单选按钮，然后单击窗体，则从键盘上输入要删除的项目内容，将其从列表框中删除。
程序的运行情况如图2所示。
图1
图2
在考生文件夹下的工程文件zcsj4.vbp（相应的窗体文件名为zcsj4.frm），可以实现上述功能。
但这个程序不完整，请把它补充完整。
[要求]去掉程序中的注释符，把程序中的?
改为适当的内容，使其正常运行，但不能修改程序中的其他部分。
最后将修改后的文件按原文件名存盘。
35、考生文件夹
在考生文件夹下有一个工程文件zcsj1.vbp，相应的窗体文件为zcsj1.frm。
其功能是随机产生30个0～1000的整数，将其放入一个数组中，然后输出其中的最大值。
程序运行后，单击“输出最大值”按钮（名称为Command1，如下图所示），即可求出其最大值，并显示在窗体上。
这个程序不完整，请把它补充完整，并能正确运行。
[要求]去掉程序中的注释符，把程序中的?
改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。
最后将修改后的文件按原文件名存盘。
36、考生文件夹
在考生文件夹中有工程文件zcsj2.vbp，其中的窗体如下图所示。
程序刚运行时，生成一个有10个元素的整型数组。
若选中“查找最小值”（或“查找最大值”）单选按钮，单击“查找”按钮，则找出数组中的最小值（或最大值），并在标签Label2中显示。
请去掉程序中的注释符，将程序中的?
改为正确的内容。
[注意]考生不得修改窗体文件中已经存在的程序，最后将修改后的文件按原文件名进行存盘。
37、考生文件夹
在考生文件夹下有一个工程文件zcsj3.vbp，相应的窗体文件为zcsj3.frm。
其功
升级会员 