下列程序的功能是：当发生窗体的单击事件时，求出3～1000之间的所有素数的和以及所有能被3和5整除的数的和(素数是指只能被1和它本身整除的数)，并在窗体上把这两个和显示出来。
Private Sub Form_Click()
Dim s1 As Long，s2 As Long
Dim i As Integer
For i=3 To 1000
If prime(i) Then
s1=s1+i
Else If 【11】 Then
s2=s2+i
End If
Next i
Print s1，s2
End Sub
Public Function prime(ByVal n As Integer)As Boolean
Dim j As Integer
For j=2 To n-1
If n Mod j=0 Then
Exit For
End If
Next j
If j=n Then
【12】
Else
prime=False
End If
End Function
