第四章有答案基本控制结构
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
第四章基本控制结构
一、单选题
1．设a=”a”,b=”b”,c=”c”,d=”d”,执行语句x=Iif((a
A）”a”B）”b”C）”B”D）”A”
2．设分段函数y(x)的表达式为：y=x+1 (x>0)
y=x-1 (x<=0)
则能正确实现该分段函数计算的语句为____C_____。
A）If x>0 Then y=x+1
y=x-1
B）If x>0
y=x+1
Else
y=x-1
End If
C）y=x+1
If x<=0 Then
y=x-1
End If
D）If x>0 Then y =x+1
Else y=x-1
End If
3．有如下程序：
Private Sub Form_Click()
xcase=1
t=InputBox(“请输入一个数：”)
Select Case t
Case Is>0
Y=xcase+1
Case Is=0
Y=xcase+2
Case Else
Y=xcase+3
End Select
Print xcase;Y
End Sub
若输入-1，输出结果为____A_____。
A)1 4 B)1 3 C)1 2 D)1 1
4．下列程序段中，若要使输出结果为输入的两个数中较大者的平方，空白处应填写__D__语句。
x=Val(InputBox(“请输入x的值：”))
y=Val(InputBox(“请输入y的值：”))
s=x : ______________
s=s*s
Print s
A）If (x
C）If (x
5．设X初值为0，则下列循环语句执行后，X的值等于____A_____。
For i=1 To 10 Step 2
X=X+I
Next i
A)25 B)36 C)24 D)27
6．执行以下程序段时，____D_____。
x=1
Do While x<>0
x=x*x
print x;
Loop
A）循环体将执行1次B）循环体将执行0次
C）循环体将执行无限次D）系统将提示语法错误
7．设窗体中包含1个命令按钮Command1，1个标签Label1；并有以下的事件过程。程序运行后，单击Command1按钮，标签中显示的内容是___C______。
Private Sub Command1_Click()
Dim I As Integer,n As Integer
I=1: n=0
Do While I<10
n=n+I
I=I*(I+1)
Loop
Label1=I & ”-” & n
End Sub
A）6-3 B）24-9 C）42-9 D）6-9
8．有如下程序：
Do
循环体
Loop While <条件>
则以下叙述中错误的是___B______。
A）若“条件”是一个为0的常数，则一次也不执行循环体
B）“条件”可以是关系表达式、逻辑表达式或常数
C）循环体中可以使用Exit Do语句
D）如果“条件”总是为True，则不停地执行循环体
9．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1___Click()
Dim num As Integer
num = 1
Do Until num > 6
Print num;
num = num + 2.4
Loop
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是___C______。
A）1 3.4 5.8 B）1 3 5
C）1 4 7 D）无数据输出
10．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()
Dim a As Integer, s As Integer
a = 8
s = 1
Do
s = s + a
a = a－1
Loop While a <= 0
Print s; a
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是___B______。
A）7 9 B）34 0 C）9 7 D）死循环
11．下列程序段显示___C______个“*”。
For i=1 to 5
For j=2 to 5
Print ”*”
Next j
Next i
A）25 B）10 C）20 D）15
12．要使下面程序段能正确显示1！、2！、3！、4！的值，第一行括号处应填写__B____。
For j=1 to 4
n=n*j
Print n
Next j
A）n=0 B）n=1 C）j =1 D）j=0
14．在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
For i=1 To 4
x=4
For j =1 To 3
x=3
For k=1 To 2
x=x+6
Next k
Next j
Next i