题干

下列VB程序运行时,单击命令按钮Command1后,文本框Text1中显示的内容是____

Private Sub Command1_Click()

Dim i As Integer, c As Integer, n As Integer

c = 0: n = 10

For i = 1 To 10 Step 2

    If n Mod i = 0 Then

       c = c * i

    Else

       c = c + i

    End If

Next i

Text1.Text = Str(c)

End Sub

上一题 下一题 0.0难度 选择题 更新时间:2018-11-16 04:45:59

答案(点此获取答案解析)

31