《VB程序设计》作业（三）答案
客观题部分：
选择题（每题1分，共15题）
参考答案：
1B，2D，3C，4A，5D
6B，7D，8A，9D，10A
11D，12C，13A，14A，15A
主观题部分：
编程题（每题15分，共1题）
参考答案：
Private Sub Command1_Click()
For i = 1 To 10
x = Int (Rnd * 100 + 100)
If x Mod 5= 0 Then
Print x
s = s + x
End If
Next i
Print "Sum＝"; s
End Sub
