知识点:程序填空(二) 以下程序段的作用是利用随机函数产生100个[100,300]之间的随机整数,打印其中5的倍数,和不是5的倍数的其他数的和。 Private Sub Command1_Click() Dim s As Integer, i As Integer s = 0 For i = 1 To 100 Randomize x = Int( (1) ) s = s x If x Mod (2) = 0 Then Print x. t = t x End If Next i Print Print "非5倍数的数的和为". (3) End Sub