VB复习题.docx
- 文档编号:9704193
- 上传时间:2023-05-20
- 格式:DOCX
- 页数:17
- 大小:38.48KB
VB复习题.docx
《VB复习题.docx》由会员分享,可在线阅读,更多相关《VB复习题.docx(17页珍藏版)》请在冰点文库上搜索。
VB复习题
复习题1
一、选择题(每题2分,共30分)
1.以下四个VB的变量名中,合法的是_________。
A.Sum
B.R$e
C.Print
D.3xy
2.在声明一个过程中必须有的是_________。
A.Private关键字
B.SUB关键字
C.返回值类型说明
D.参数
3.把Form1的标题改为“文档资料”的语句是_________。
A.Form1.Text=“文档资料”
B.Form1.Text=文档资料
C.Form1.Caption=“文档资料”
D.Form1.Title=“文档资料”
4.下面在文本框Text1内显示变量ST内容的语句是_________。
A.ST=Text1.Text
B.Text1.showST
C.Text1.Text=ST
D.Text.Text1=ST
5.要在设计的菜单中出现分隔条需要_________。
A.在标题框内输入"————————"
B.在标题框内输入"—"
C.在名称框内输入"—"
D.在名称框内输入"&—"
6.下列选项中窗体载入事件为_________。
A.Load事件B.Click事件
C.DblClick事件D.Unload事件
7.在块结构条件语句If-Then/Endif中_________。
A.必须至少有一个Elseif语句
B.可以有任意多个ElseIf-Then语句
C.如果没有Else语句,运行时将出现错误
D.给定的条件只能是关系表达式或逻辑表达式
8.以下Case语句中错误的是_________。
A.Case10To1
B.CaseIs>10
C.CaseIs>10,Is<50
D.Case3,5,Is>10
9.对DoUntil…Loop循环,正确的是_________。
A.如果循环条件为常数0,则一次循环也不执行
B.如果循环条件为常数0,则至少执行一次循环
C.如果循环条件是不为0的常数,则至少执行一次循环
D.无论循环条件是否为"True",则至少执行一次循环
10、从键盘上能够输入两个字符串,分别保存在变量str1、str2中。
确定第二个字符串在第一个字符串中起始位置的函数是_________。
ALeftBMid
CStringDInstr
11.模拟方形骰子投掷的可能性的表达式是_________。
A)Int(6*Rnd
(1))B)Int(1+6*Rnd
(1))
C)Int(6*Rnd
(1)-1)D)Int(7*Rnd
(1)-1)
12、引用列表框的最后一项应使用_________。
A)List1.List(List1.ListCount-1)
B)List1.List(List1.ListCount)
C)List1.List(ListCount)
D)List1.List(ListCount-1)
13.在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,如果在文本框中输入文本,则标签中立即显示相同的内容。
以下可以实现上述操作的事件过程是_________。
A.PrivateSubText1_Change()
Label1.Caption=Text1.Text
EndSub
B.PrivateSubLabel1_Change()
Label1.Caption=Text1.Text
EndSub
C.PrivateSubText1_Click()
Label1.Caption=Text1.Text
EndSub
D.PrivateSubLabel1_Click()
Label1.Caption=Text1.Text
EndSub
14.以下程序段的输出结果是_________。
x=1
y=4
DoUntily>4
x=x*y
y=y+1
Loop
Printx
A.1 B.4 C.8 D.20
15.在窗体上画一个命令按钮(其名称为Commandl),然后编写如下代码:
_________。
PrivateSubCommandl_Click()
Dima
a=Array(1,2,3,4)
I=3:
j=1
DoWhilei>=0
s=s+a(i)*j
i=i-1
j=j*10。
Loop
Prints
EndSub
运行上面的程序,单击命令按钮,则输出结果是
A)4321 B)123 C)234 D)1234
二、填空题(第1-10每空1分,第11-15每空2分,共20分)
(以下1至10空,每空2分,共10分)
1.设置对象属性的方法有两种,其一是在设计阶段,在__属性窗口__中直接修改相应属性的值,其二是在应用程序运行时,通过__代码__来动态设置。
2.组合框(ComboBox)控件是___组合列表框____和___文本框__组合而成的一种控件,因而它兼有这两种控件的特性。
3.在VB程序设计中,通常采用_____PopupMenu_____方法来创建一个弹出式菜单。
4.当用户增加、删除或修改文本框(TextBox)的内容时,都会触发文本框的____Change______事件。
5.在VB中,若要使一个文本框(Text)中的内容在超过文本框的宽度时能够自动换行显示,应当将这个文本框的__MultiLine____属性的值设置为True。
6.设有如下程序语句:
ForI=1To100Step7
S=S+1
NextI
在该循环语句中,循环体S=S+1的循环执行次数应为______15________。
7.我们可以通过设置单选按钮的____checked_______属性来改变单选按钮的状态。
8.设某个程序中要用到一个二维数组,要求数组名为A,类型为字符串类型,第一维下标从1到5,第二维下标从-2到6,则相应的数组声明语句为__DimA(1TO5,-2TO6)_。
(以下11至15空,每空2分,共10分)
9.设执行以下程序段时依次输入1、3、5,执行结果为___1____。
Dima(4)AsInteger,b(4)AsInteger
ForK=0To2
a(K+1)=Val(InputBox("请输入数据:
"))
b(3-K)=a(K+1)
NextK
Printa(K),b(K)
10.窗体中有图片框(Picture1)和计时器(Timer1)两个控件,运行程序时,将图片加载到图片框中,然后图片框以每2秒钟一次的速度向窗体的右下脚移动,每次向左、向右移动100twip(20分之一像素)。
请填空:
dim x,y As Integer
PrivateSub Form_load()
Picture1.picture=loadPicture(“c:
\pic\ball.ico”)
Timer1 .Interval=200
x=0
y=0
End Sub
Private Sub Timer1_Timer()
Ifx>=picture1.widthory>=picture1.heightthen
x=0
y=0
____Endif______
Picture1. left =x+100
Picture1.top=y+100
End Sub
三、完成程序题(每题10分,共20分)
1.程序功能:
下面的事件过程判断文本框Text1中输入的数所在区间,并在文本框Text2中输出判断结果
'--------------------------------------
PrivateSubCommand1_Click()
Dimint1AsInteger
'**********SPACE**********
int1=Val(Text1.Text)
SelectCaseint1
Case0
Text2.Text="值为0"
'**********SPACE**********
CaseIs>=1andIs<=10
Text2.Text="值在1和10之间(包括1和10)"
'**********SPACE**********
CaseIs>10
Text2.Text="值大于10"
CaseElse
Text2.Text="值小于0"
ENDSELECT
EndSub
2、以下程序在文本框Text1中输入任一字符串,并按相反的次序显示在文本框Text2中。
PrivateSubCommand1_Click()
DimNAsString,CASString,DASString
N=Text1.Text
M=Len(Text1.Text)
ForI=MTo1STEP-1
C=Mid(N,I,1)
D=D&C
NextI
Text2.Text=D
EndSub
四、程序设计题(每题10分,共30分)
1.该程序用于增加、修改、删除列表框中的项目,窗体中的对象如图2所示。
当我们在列表框中的项目上单击时,该项目即出现在文本框中。
单击“增加”按钮可将文本框中的内容增加到列表框中;在文本框中编辑你所选中的项目后单击“修改”按钮可用于修改你所选中的列表框中的项目;单击“删除”按钮用于删除你所选中的列表框中的项目,同时清空文本框。
请给下列事件过程填写代码。
图2
PrivateSubForm_Load()
‘向列表框中添加下列项目。
List1.AddItem"青岛大学"
List1.AddItem"武汉大学"
List1.AddItem"吉林大学"
EndSub
PrivateSubList1_Click()
'该按钮用于将你所选中的列表框中的项目显示在文本框中
Text1.Text=list1.___________List(List1.Listindex)______________________
EndSub
PrivateSubCommand1_Click()
'该按钮用于将文本框中的内容增加到列表框中
List1.AddItem___________Text1.Text______________________
EndSub
PrivateSubCommand2_Click()‘删除按钮
'该按钮用于删除你所选中的列表框中的项目,同时清空文本框。
__________List1.Removeitem(List1.Listindex)_________
Text1.Text=””
EndSub
PrivateSubCommand3_Click()‘修改按钮
'该按钮用于修改你所选中的列表框中的项目。
______________List1.List(List1.Listindex)=inputBox(“请输入新的值:
”)___
______________空____________________
EndSub
2.编写程序用于计算N=1×2×3×…×100。
Dimiasinteger,sasDouble
s=1
Fori=1to100step1
s=s*i
Nexti
Prints
3.编写一求平均值的函数aver(x,y)。
主调程序调用函数过程求平均值并输出。
界面如下图所示。
PrivateFunctionaver(xAsDouble,yAsDouble)AsDouble
aver=(x+y)/2
EndFunction
复习题2
一、选择题(每题2分,共30分)
1.语句Dimarr(-3To5,2To6)AsInteger定义的数组元素有_______个。
A)45B)40C)11D)54
2、以下选项中,不属于标签的属性是。
A)EnabledB)CaptionC)DefaultD)Font
3、要求改命令按钮显示的文本,应当在属性窗口中改变的属性是。
A)CaptionB)NameC)TextD)Label
4、设置一个单选按钮(OptionButton)所代表选项的选中状态,应当在属性窗口中改变的属性是。
A)CaptionB)NameC)TextD)Value
5、以下选项中,不是VisualBasic控件的是。
A)窗体 B)定时器 C)单选框 D)命令按钮
6、窗体Form1的Name属性是Frm1,它的单击事件过程名是。
A)Form1_ClickB)Form_Click
C)Frm1_ClickD)Me_Click
7、若要设置定时器控件的定时时间,需设置的属性是。
A)Enabled B)Value C)Interval D)Text
8、能够改变复选框中背景颜色的属性是。
A)ValueB)FontColor
C)BackColorD)Font
9.设a=5,b=6,c=7,d=8,执行语句X=Ilf((a>b)And(c>d),10,20)后,x的值是。
A)10 B)20 C)30 D)200
10.以下关于PictureBox控件和Image控件的描述中,错误的选项是_________。
A)设置Image控件的stretch属性,可使该控件根据本身的大小来调整图片的大小。
B)PictureBox控件支持Print方法,而Image控件不支持该方法。
C)Image控件可作为其他控件的容器。
D)PictureBox控件和Image控件都可以利用LoadPicture函数在程序运行阶段装载需要的图片进行显示。
11.在参数传递过程中,使用关键字来修饰参数,可以使之按值传递。
A)ByValB)BYRefC)ValueD)Reference
12.Sub过程与Function过程最根本的区别是。
。
A)Sub过程可以使用Call语句或直接使用过程名调用,而Function过程不可以
B)Function过程可以有参数,Sub过程不可以
C)两种过程参数的传递方式不同
D)Sub过程的过程名不能返回值,而Function过程能通过过程名返回值
13.下列循环能正常结束循环的是
A)
i=5
Do
i=i+1
LoopUntili<0
B)
i=1
Do
i=i+2
LoopUntili=10
C)
i=10
Do
i=i+1
LoopUntilI>0
D)
i=6
Do
i=i-2
LoopUntilI=1
14..在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下的事件过程:
PrivateSubCommand1_Click()
s=0
Fori=0To15
X=2*i-1
IfXMod3=0Thens=s+1
Nexti
Label1.Caption=s
EndSub
程序运行后,单击命令按钮,则标签中显示的内容为
A)1B)5C)27D)45
15.在窗体上画一个名称为Command1的命令按钮,一个名称为Label1、Label2、Label3的标签,然后编写如下的事件过程:
PrivatexAsInteger
dimyAsInteger
PrivateSubCommand1_Click()
DimzAsInteger
n=10
z=n+z
y=y+z
x=x+z
Label1.Caption=x
Label2.Caption=y
Label3.Caption=z
EndSub
运行程序后,连续三次单击命令按钮后,则三个标签中显示的内容分别是
A)101010B)303030
C)303010D)103030
二、填空题(每空2分,共20分)
(以下1至10空,每空2分,共10分)
1.可用窗体的____print____ 方法在窗体中显示文字。
2.当程序运行时,要求窗体中的文本框呈现空白,则在设计时,应当在此文本框的__属性___窗口中,把此文本框的___text__属性设置成空白。
3.要想在代码中给名为txtshow的文本框赋予文本:
GOODWORK,应当编写的语句是_____txtshow.text=“GOODWORK”______。
4.Label和TextBox控件用来显示和输入文本,如果仅需要让应用程序在窗体中显示文本信息,可使用______Lable_____控件;若允许用户输入文本,则应使用_______TextBox______控件。
5.PictureBox控件可通过设置其_____AutoSize_____属性为True使之可自动调整大小;而Image控件可通过设置其_____stretch______属性为True,使其加载的图片能自动调整大小以适应Image。
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 复习题
![提示](https://static.bingdoc.com/images/bang_tan.gif)