当前位置: 答题翼 > 问答 > 计算机类考试 > 正文
目录: 标题| 题干| 答案| 搜索| 相关
问题

运行下列程序:Private Sub Form_Click()Dim sum As Double, i As IntegerFor i = 1 To 20If i


运行下列程序:

Private Sub Form_Click()

Dim sum As Double, i As Integer

For i = 1 To 20

If i Mod 5 = 0 Then

sum = sum + i

End If

Next i

Print sum

End Sub

单击窗体后,则在窗体上显示的结果是()。

A.50

B.100

C.4

D.5050

参考答案
您可能感兴趣的试题
  • 运行下列程序:Private Sub form_Click()x = InputBox("请输入一个数:")Select Cas

  • 运行下列程序:Private Sub form_Click()s = InputBox("请输入一个字符A:")Select

  • 运行下列程序:Private Sub Command1_Click()s$ = "abcdefabcdefabcdef"k = InStr(

  • 运行下列程序:Private Sub Command1_Click()x = "祝你成功"y = "1234"F

  • 运行下列程序:Private Sub form_Click()x$ = "123": y$ = "abc"n = Len

  • 运行下列程序:Private Sub Form_Click()a = 3t = InputBox("请输入一个整数")Sele