刷题首页
题库
高中信息
题干
下列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
上一题
下一题
0.99难度 填空题 更新时间:2019-04-17 09:11:42
答案(点此获取答案解析)
同类题1
有如下部分程序段:
a(1) = "20": a(2) = "16": a(3) = "12": a(4) = "o": a(5) = "k"
For i =" 1" To 4
For j =" 5" To i + 1 Step -1
If a(j) >a(j - 1) Then t =" a(j):" a(j) =" a(j" - 1): a(j - 1) = t
Next j
List1.Additem a(i)
Next i
程序运行后列表框中显示的结果是
A.12,16,20,o,k
B.o,k,20,16
C.o,k,20,16,12
D.20,16,12
同类题2
某VB程序的部分代码如下:
a(1)=2
a(2)=3
For i=3 To 7
a(i)=a(i-1)*a(i-2)
If a(i)\10>0 Then
a(i+1)=a(i) Mod 10
a(i)=a(i)\10
i=i+1
End If
Next i
则执行该程序段后,数组元素a(8)的值为( )
A.2
B.4
C.6
D.8
同类题3
使用两种不同的VB程序段实现相同的功能:则划线处填入的代码正确的是()
A.
B.
C.
D.
同类题4
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
同类题5
下列程序的运结果是
DIM A(1991 TO 1998) AS INTEGER
FOR I=1 TO 8
A(I)=I
PRINT A(I);
NEXT I
A.1 2 3 4 5 6 7 8
B.1991 1992 1993 1994 1995 1996 1997 1998
C.显示出错信息
D.0 0 0 0 0 0 0 0
相关知识点
算法理论
面向对象程序设计 VB开发工具
循环语句