刷题首页
题库
高中信息
题干
下列VB程序运行时,单击Command1后,标签Label1中显示的内容是_______
Private Sub Command1_Click()
Dim s As Integer, j As Integer
s = 0
For j =" 1" To 10
If j Mod 2 <> 0 Then
s =" s" + j
End If
Next j
Label1.Caption = Str(s)
End Sub
上一题
下一题
0.99难度 填空题 更新时间:2015-08-21 03:45:46
答案(点此获取答案解析)
同类题1
公元6世纪,中国的《张丘建算经》有一道著名的百鸡问题:公鸡5钱1只,母鸡3钱1只,小鸡3只1钱,有人用100钱买了100只鸡。请编写一段代码求其中公鸡,母鸡,小鸡各多少只?
Private Sub Command1_Click()
For i =" 0" To 20
For j =" 0" To 33
k =
If
Then Print i, j, k
Next j
Next i
End Sub
同类题2
在 VB 中,下列程序段执行后,变量 s 的值是
s=1
For k="1" To 3
s=s+1
Next k
A.1
B.3
C.4
D.6
同类题3
有两个以字母结尾的字符串s 1和s 2,在忽略字符串中空格的前提下判断它们是否相同。实现该功能的VB程序段如下:
Else
End If
Loop
.
“相同”
.
“不相同”方框中的代码由以下三部分组成:
①
②
③
<>" "
<>" " Then Exit Do 'Exit Do表示退出循环代码顺序正确的是( )
A.①②③
B.②①③
C.②③①
D.③②①
同类题4
填空题:(共8分,每小题2分)。
(1) 本程序中,变量a、b 的数据类型都是___________(填写中、英文均可)。
(2)以上代码中,表示输出语句的是第____行。
(3)本程序中,代码a=a+b的含义是_____(选填Ⅰ或Ⅱ)。
选项:Ⅰ.把a的值赋给a+b
Ⅱ.把a加b的和赋给a
(4)若输入的两个数分别是10和20,则程序执行完毕,变量a的值是____,变量b的值是____。
同类题5
某Visual Basic程序如下:
Private Sub Command1_Click()
Dim a(1 To 10) As Integer
Dim i As Integer
a(1) = 1
For i =" 2" To 10
a(i) =" a(i-1)" + i
Next i
Text1.Text = Str(a(5))
End Sub
运行程序,单击命令按钮Command1后,在文本框Text1中显示的内容为( )
A.5
B.10
C.15
D.21
相关知识点
算法软件操作
VB程序的调试