刷题首页
题库
高中信息
题干
下列VB程序段执行后变量n、s的值为( )
n=1: s=0
Do while s<20
s=s+n
n=n+2
Loop
A.9 16
B.11 20
C.11 25
D.9 24
上一题
下一题
0.99难度 选择题 更新时间:2019-04-16 04:14:47
答案(点此获取答案解析)
同类题1
下列VB程序用来实现1,10之间奇数之和,单击Command1后,标签Label1中显示的内容是_____,循环变量j最终的值是___________ ,并完成程序一处空白。
Private Sub Command1_Click()
Dim s As Integer,j As Integer
s=0
For j=1 To 10
If j Mod 2 <> 0 Then
_____________
End If
Next j
Label1.Caption=Str(s)
End Sub
同类题2
根据下列程序段运行后a的值 ,划线处应该填入的合理数据类型为 ( )
Dim a As ________
a = 1
For i =" 1" To 8
a =" a" * i
Next i
A.Integer
B.Long
C.Single
D.Double
同类题3
在某银行取款机上,用户银行卡密码验证的过程如下图所示:当用户输入密码时,若第1次输入错误,第2次输入才正确,则整个操作过程的执行流程是( )
A.①→②→③→④→⑤
B.①→②→③→④→⑥→⑦
C.①→②→③→④→⑥→②→③→④→⑤
D.①→②→③→④→⑥→⑦→②→③→④→⑤
同类题4
(加试题)某算法流程图如下图所示,该流程图对应的程序段为( )
A.s = 0
For i = 1 To 20
If i Mod 3 = 0 Then
s = s + 2 * i
Else
i = i + 1
End If
Next i
B.i = 1
For s = 0 To 20
If i Mod 3 = 0 Then
s = s + 2 * i
End If
i = i + 1
Next i
C.i = 1: s = 0
Do While s <= 20
If i Mod 3 = 0 Then
s = s + 2 * i
Else
i = i + 1
End If
Loop
D.i = 1: s = 0
Do While s <= 20
If i Mod 3 = 0 Then
s = s + 2 * i
End If
i = i + 1
Loop
同类题5
Sub test7()
For i =" 1" To 6
S =" S" + (-1) ^ i *2 ^ i
Next i
MsgBox (S)
End sub
该程序的运行结果是( )
A.126
B.-126
C.-42
D.42
相关知识点
算法理论
面向对象程序设计 VB开发工具
循环语句