vb控制结构综合练习
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
控制结构
一、选择题
1.VB 的3种结构化程序设计的3种基本结构是________。
A)选择结构、过程结构、顺序结构
B)递归结构、选择结构、顺序结构
C)过程结构、转向结构、递归结构
D)选择结构、顺序结构、循环结构
2.用If 语句表示分段函数3311()11
x x f x x x ⎧-≥=⎨+<⎩,以下________表
示方法不正确。
A)f=x^3+1
Ifx>=1Thenf=s^3-1
B)Ifx>=1Thenf=x^3-1
Ifx<1Thenf=x^3+1
C)Ifx>=1Thenf=x^3-1
f=x^3+1
D)Ifx<1Thenf=x^3+1Else F=x^3-1
3.执行下面的程序段后显示结果是________。
PrivateSubForm_Click() Dimm
IfmThenPrintmElsePrintm+1 EndSub A)0 B)1 C)”” D)False 4.设a=6,则执行x=IIf(a>5,-1,0)后,x 的值为________。 A)5 B)6 C)0 D)–1 5.下面程序段的运行结果是________。 cj=85 Ifcj>90Thendj="A" Ifcj>80Thendj="B" Ifcj>70Thendj="C" Ifcj>60Thendj="D" Ifcj<60Thendj="E" Print"dj=";dj A)dj=B B)dj=C C)dj=D D)dj=E 6.下列语句正确的是________。 A)IfK<3*NAndk>NThenN=k^3 B)IfK<3*NAndk>NThenN=k3 C)IfK<3*N:k>NThenN=k^3 D)IfK<3*NAndk>NThenN=k**3 7.设X=2.0,y=8.0,z=6.0,L=True ,则下列VisualBasic 表达式中值为True 的是________。 A)X+Z>YANDL B)NOT(Y
元)”的职工,应使用的逻辑表达式是________。
A)M>=2000ANDM<=5000
B)M>=2000ORM<=5000
C)M>=2000ANDM<5000
D)M>=2000ORM<5000
9.下列程序段的执行结果为________。
x=Int((69-60)*Rnd+60)
SelectCasex
CaseIs>90
Print"优秀"
Case80To89
Print"良好"
Case60To79
Print"合格"
CaseElse
Print"不合格"
EndSelect
A)优秀 B)良好 C)合格 D)不合格
10.在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:运行结果________。
PrivateSubCommand1_Click()
ForI=1To4
ForJ=0ToI
PrintChr(65+I);
NextJ
NextI
EndSub
单击命令按钮后,运行结果________。
A)BB B)A
CCC BB
DDDD CCC
EEEEE DDDD
C)B D)AA
CC BBB
DDD CCCC
EEEE DDDDD
11.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
DimiAsInteger,nAsInteger
Fori=0To50
i=i+3
n=n+1
Ifi>10ThenExitFor
Next
Text1.Text=Str(n)
EndSub
程序运行后,单击命令按钮,在文本框中显示的值是________。
A)2 B)3 C)4 D)5
12.在窗体上画一个命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
Fori=1To4
x=4
Forj=1To3
x=3
Fork=1To2
x=x+6
Nextk
Nextj
Nexti
Printx
EndSub
程序运行后,单击命令按钮,输出结果是________。
A)7 B)15 C)157 D)538
13.阅读下面的程序段:
Fori=1To3
Forj=1Toi
Fork=jTo3
a=a+1
Nextk
Nextj
Nexti
执行上面的三重循环后,a的值为________。A)3 B)9 C)14 D)21
14.在窗体上画一个文本框(其Name 属性为Text1),然后编写如下事件过程:
PrivateSubForm_Load()
Text1.Text=""
Text1.SetFocus
Fori=1To10
Sum=Sum+i
Nexti
Text1.Text=Sum
EndSub
上述程序的运行结果是________。
A)在文本框Text1中输出55
B)在文本框Text1中输出0
C)出错
D)在文本框Text1中输出不定值
15.有如下程序:
a=10
b=4
Forj=1To20Step-2
a=a+5
b=b+4
Nextj
Printa;b
运行后,输出的结果是________。