高校等考试题天天练二级VB]10月25日

发布时间:2019-02-04 19:05:49

知识点:程序填空(二)
以下程序段的作用是利用随机函数产生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
阅读更多其他试题,请访问生活日记网 用日志记录点滴生活!考试试题频道。
喜欢考试试题,那就经常来哦

该内容由生活日记网提供.