填空题

下面的程序的作用是利用随机函数产生10个100-300(不包含300)之间的随机整数，打印其中7的倍数的数，井求它们的总和，请填空。
　　Sub TOF( )
　　Randomize
　　Dim s As Double
　　Dim a(10) As lnteger
　　For i=0 To 9
　　　　　　【10】　
　　Next
　　For i=0 To 9
　　　　If　【11】　Then
　　　　　Print a(i)
　　　　　s=s+a(i)
　　　　　【12】　
　　Next i
　　Print
　　Print "S=" ; s
　　End Sub