VB检验题必做部分.docx
- 文档编号:27134822
- 上传时间:2023-06-27
- 格式:DOCX
- 页数:19
- 大小:32.75KB
VB检验题必做部分.docx
《VB检验题必做部分.docx》由会员分享,可在线阅读,更多相关《VB检验题必做部分.docx(19页珍藏版)》请在冰豆网上搜索。
VB检验题必做部分
VB必做测验及答案
实验4选择结构程序设计2
实验6循环结构程序设计9
实验7数组16
实验9常用控件20
实验4选择结构程序设计
1.
c的值为。
若整型变量a的值为2、b的值为3,则下列程序段执行后整型变量
Ifa>5then
Ifb<4then
c=a-b
Else
c=b-a
Endif
Elselfb>3thenc=a*b
Else
c=amodb
Endif
a)2
b)-1
c)1
d)6答案:
A
2.下列程序的执行结果为。
A=100:
b=50
Ifa>bThen
a=a-b
Else
b=b+a
Endif
Printa
a)50
b)100
c)200
d)10答案:
A
3.以下程序输出1到1000之间所有的偶数之和,请补充完该程序。
PrivateSubCommand_Click()
DimxAsDouble
ForI=0To1000
IfThen
x=x+l
EndIf
NextI
Printx
EndSub
a)iMod2=0
b)xMod2=0
c)
答案:
A
IMod2<>0
d)xMod2<>0
4.下列程序段的执行结果为
x=Int(Rnd+4)
SelectCasex
Case3
Print"优秀"
Case4
Print"良好"
Case5
Print"合格"
CaseElse
Print"不合格"
EndSelect
A)优秀
B)良好
C)合格
D)不合格
答案:
B
5.以下程序段的执行结果是。
X=2:
y=1
Ifx*y<1Then
y=y-i
Else
y=-1
Printy-x>0
EndIf
a)Ture
b)False
c)-1
d)1答案:
B
6.设计两个CheckBox,—个显示粗体,一个显示斜体,通过对CheckBox的选择,在一个文本框中显示相应效果的文本,完成下列程序。
PrivateSubForm_Load()
Check1.Caption="显示粗体”
Check2.Caption="显示斜体”
Text1.Text="VisualBasic6.0"
EndSub
PrivateSubCheck1_Click()
IfCheck1.Value=1Then
Text1.FontBold=True
Else
Text1.FontBold=False
EndIf
EndSub
PrivateSubCheck2_Click()
IfCheck2.Value=1Then
Text1.Fontltalic=True
Else
Text1.Fontltalic=False
EndIf
EndSub
7.下列程序的作用是将三个数按从大到小进行排序,请补充完该程序。
Ifa d=a: a=b: b=d EndIf Ifa d=a: a=c: c=d Endlf IfThen d=b: b=c: c=d Endlf Printa,b,c答案: b 8.在下列关于SelectCase的叙述中,错误的是() 选择一个答案 £a.Case10To100表示判断Is是否介于10与100之间 b.Case"abc〃,‘ABC〃表示判断Is是否和"abc〃、"ABC〃两个字匕I 符串中的一个相同 -c.Case-7,0,100表示判断Is是否等于字符串"-7,0,100〃/ d.Case”X"表示判断Is是否为大写字母X 9.下列程序的执行结果是() X=5 Y=-20 IfNotX>0ThenX=Y-3ElseY=X+3 PrintX-Y;Y-X 选择一个答案 「a.3-3 可b.-33/ c.5-8 d.25-25 10.下列说法正确与否: If语句中的条件表达式中只能使用关系或逻辑表达式选择一个答案 「a.正确 *b.错误/ 11.以下说法正确与否: 在情况语句中,各分支(即Case表达式)的先后顺序无关 选择一个答案 「a.错误 -b.正确/ 12.以下说法正确与否: 有If则必有与之对应的Endif 选择一个答案可a.错误/ b.正确 实验6循环结构程序设计 1.下列程序的执行结果为。 DimSAsInteger,nAsInteger S=0: n=1 DoWhilen<=100 S=S+n n=n+1 Loop PrintS a)5050 b)2500 c) 答案: A 3000 d)4000 2.以下程序计算2到50间所有偶数的和,请补充完该程序 Submult() DimSumAsInteger Sum=0 DimIasinteger Forto50 IfIMOD2=___Then___ NextI Printsum EndSub答案: l=2#0#SUM=SUM+l 3.下列程序段的执行时,共循环―。 Fora=0To1 Forb=1To2 Forc=1To3 1=1+1 Nextc Nextb nexta答案: 12 4.下列程序的执行结果是 K=0 For1=1To3a=IAIAKprinta; NextI a)111 b)123 c)000 d)149答案: A 5.下列程序运行后,输出的结果为。 B=1 Dowhile(b<40) b=b*(b+1) Loop Printb a)42 b)39 c)6 d)1答案: A 6.下列程序执行后,变量s的值为。 DimsAslong,xAsIntegers=0: x=1 DoWhile(x<10) s=s+x x=x+2 Loop Prints a)10 b)25 c)50 d)100答案: B 7.当变量x=2,y=5时,以下程序的输出结果为 Dountily>5 x=x*y y=y+1 loop printx a)2 b)5 c)10 d)20答案: C 8.执行下面的程序,在窗体上显示的输出结果的第一行是(15),第二行是(16) PrivateSubForm_Click() DimaAsInteger,bAsInteger,cAsInteger c=-2 Fora=6To1Stepc a=a+1 c=c-a b=b+1 Nexta Printb Printc EndSub 答案: 6-29 9.要实现同样的循环控制,在DoWhile…Loop和Do…LoopWhile循环 结构中给定的循环条件一样的。 该结论是否正确: 选择一个答案 *a.正确/ Cb.错误 10.Do…LoopWhile语句实现循环时,不管条件真假,首先无条件地执行 次循环 该结论是否正确: 选择一个答案 a.错误 yib.正确/ 11.Do…LoopUntil语句实现循环时,只要条件是假,循环将一直进行下去该结论是否正确: 选择一个答案匸a.错误 •b.正确/ 12.For循环语句正常结束(即不是通过ExitFor语句退出循环或强制中断)其 循环控制变量的值一定大于“终值”,并等于“终值”+“步长”。 该结论是否正确: 选择一个答案 Ca.正确 片飞.错误/ 13.如果有多重Do循环嵌套,位于最里层循环体语句中的ExitDo语句可以退出所有的循环。 该结论是否正确: 选择一个答案 「a.正确 实验7数组 ,然后编写如下代码: 1.在窗体上画一个命令按钮(其Name属性为Command1) PrivateSubCommand1_Click() Dima(5) Fori=0To4 A(i)=i+1 t=i+1 Ift=3Then Printa(i) A(t-1)=a(i-2) Else A(t)=a(i) Endif Ifi=3Thena(i+1)=a(t-4) A(4)=1 Printa(i) Nexti EndSub 程序运行后,单击命令按钮,输出结果是123141 2.设执行以下程序段时依次输入1、3、5,执行结果为。 Dima(4)AsInteger Dimb(4)AsInteger ForK=0To2 a(K+1)=Val(InputBox(“请输入数据: ")) b(3-K)=a(K+1) NextK Printb(K) a)1 b)3 c)5 d)0答案: A 3.如果有数组声明Dima(10)AsInteger,则该数组共有元素。 a)10 b)11 c)9 d)不确定答案: B 4.数组的下标可取的变量类型是。 a)日期型 b)字符型 c)数值型 d)可变型答案: C 5.用以下语句Dimb(-2to4)asstring所定义的数组的元素个数是。 a)2 b)4 c)6 d)7答案: D 6.下列程序是将数组a的元素倒序交换,即第1个变为最后一个,第2个变为倒数第2个,设数组中有10个元素完成下列程序。 PrivateSubBackward(a()) DimiAsInteger,TmpAsInteger Fori=1To5 Tmp=a(i) Nexti EndSub 7.如下数组声明语句,正确的是。 a)dima[3,4]asintiger b)dima(3,4)asstring c) 答案: B dima(n,n)assingle d)dima(34)asinteger 8•下列关于数组的说法正确的是()选择一个答案 「a.在VB中,数组只能在模块中定义,不能在过程中定义 底b.在VB中,一个数组中所包含的元素只能是相同类型的数据 c.在定义数组时,数组的每一维元素的个数必须是常数,不能是变量或表达式丿 ad.同普通变量一样,数组也可以不定义,先使用 9.使用Dim定义数组时,其数组的上界或下界,可使用已赋值的变量。 该结论是否正确: 选择一个答案 a.正确 *b.错误丿 10.数组的下界一定是大于0的整数。 该结论是否正确: 选择一个答案 -a.错误/ 匸b.正确 11.可以在程序中多次使用ReDim语句来改变动态数组的大小、维数和类型。 该结论是否正确: 选择一个答案 可a.错误/ £b.正确 12.可以使用OptionBase2语句把数组下标下界的默认值设置为2。 该结论是否正确: 选择一个答案 「a.正确 •b.错误/ 实验9常用控件 1.所有控件都有的属性是在程序中作为对象的标识引用。 a)Caption b)Value c)Text d)name答案: D 2.下列性用于设置或返回文本框中的文本。 a)Caption b)Text c)Name d)Draglcon答案: B 3.可以用作其它控件容器的控件有(? ? ) a)窗体控件,列表控件,图像控件 b)窗体控件,文本框控件,框架控件 c)窗体控件,框架控件,图片框控件 d)窗体控件,标签控件,图片控件答案: C 4.以下不属控件的一项是。 a)文本框 b)标签框 c)列表框 a)Top b)Left c)Width d)Height答案: A 6.复选框控件其Value属性的可取值是。 a)Trut和False b)0和1 c)1、2、3 d)0、1、2答案: D 7.如果有三个单选按钮直接画在窗体上,另有四个单选按钮画在框架中,则运行时,可以 同时选中选项按钮(提示: 该题答案不能出现汉字)。 答案: 2 8.我们在一个窗体上建立两个文本框,名称分别为Text1和Text2,事件过程如下, PrivateSubText1_change() Text2.text=ucase(Text1.text) EndSub 则在Textl文本框输入"visualbasic”,Text2将显示。 a)Text2中无内容显示。 b)Text2显示"VISUALBASIC"。 c)Text2显示"visualbasic" d)Text1显示"visualbasic"答案: B 9.选中复选框控件时,Value属性的值为() 选择一个答案 可a.1 Qb.True巨c.0 d.False 10. )属性。 让复选框控件的事件过程不响应事件,可修改控件的(选择一个答案 *a.Enable/ b.Caption c.TebStop d. Appearanee 11.若要在同一窗体中安排两组单选框(OptionButton)可用()控件予以分 选择一个答案 「a.列表框 「b.图片框 p_|c.框架/ 「d.组合框 12.设置列表框各表项中的文本,用( )属性。 选择一个答案 b.Caption c.List丫 d.Text 13.list1.clear中的clear是() 选择一个答案 」|a.属性 弓—|b.对象 c.事件
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 检验 题必做 部分
![提示](https://static.bdocx.com/images/bang_tan.gif)