淮南市长王宏丈夫是谁:给我做条vb题目

来源:百度文库 编辑:神马品牌网 时间:2024/03/29 20:55:31
阅读程序
Option Base 1
Private Sub Form_Click()
Dim arr, sum
sum = 0
a = Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19)
For i = 1 To 10
If arr(i) / 3 = arr(i) \ 3 Then
sum = sum + arr(i)
End If
Next i
Print sum
End Sub
程序运行后,单击窗体,输出结果为
(请您给我讲讲是怎么做出来的,每个语句的含义是什么)

答案:27

这么容易的啊。想来你是刚学程序

推荐你应该好好去运行一下,而不是在这里提问。