K3常用VB语句 中显示 中的奇数 分析程序段

下列VB程序运行时，单击Command1后，标签Label1中显示的内容是____。
Private Sub Command1_Click（）
Dim s As Integer，j As Integer
s=0
For j=1 To 10
If j Mod2< >0 Then
s=s+j
End If
Next j
Label1.Caption=Str（s）
End Sub


25


此题考查For语句。分析程序段“j Mod2<>0”可得该程序是将1到10中的奇数累加至s中，故可得s=1+3+5+7+9=25，故填入25.