单项选择题

阅读程序：
Private Sub Form_Click()
x =50
For i = 1 To 4
y = InputBox( "请输入一个整数" )
y = Val(y)
If y Mod 5=0 Then
a=a+y
x=y
Else
a=a+x
End If
Next i
Print a
End Sub
程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为( )。

A) 100
B) 50
C) 120
D) 70
<上一题 目录 下一题>
热门 试题

单项选择题
设有如下的程序段： n=0 For i = 1 To 3 For j = 1 To i For k = j To 3 n=n+1 Next k Next j Next i 执行上面的程序段后，n的值为( )。
A) 3
B) 21
C) 9
D) 14
单项选择题
假定有以下通用过程： Function Fun(n As Integer)As Integer x=n * n Fun=x - 11 End Function 在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer For i = 1 To 2 y = Fun(i) Print y; Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是( )。
A) 1 3
B) 10 8
C) -10 -7
D) 0 5
相关试题