[填空題] 下列程序的功能是：當(dāng)發(fā)生窗體的單擊事件時(shí)，求出3～1000之間的所有素?cái)?shù)的和以及所有能被3和5整除的數(shù)的和(素?cái)?shù)是指只能被1和它本身整除的數(shù))，并在窗體上把這兩個(gè)和顯示出來。 Private Sub Form_Click() Dim s1 As Long，s2 As Long Dim i As Integer For i=3 To 1000If prime(i) Then s1=s1+iElse If 【11】 Then s2=s2+iEnd 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-1If n Mod j=0 Then Exit ForEnd If Next j If j=n Then 【12】 Else prime=False End If End Function

[11]i Mod 3=0 And i Mod 5=0 [12]prime=True

本題Prime()函數(shù)的功能是判斷形參n是否為素?cái)?shù)，若是，則返回True，不是則返回False。具體分析請參看有關(guān)章節(jié)。要使函數(shù)返回一個(gè)值，必須在函數(shù)中給函數(shù)名賦值，故[12]處應(yīng)填“prime=True”。發(fā)生Form_Click事件時(shí)，將把3～1000之間的所有素?cái)?shù)加到s1中，把能被3和5整除的數(shù)加到s2中，在循環(huán)中首先調(diào)用Prime()函數(shù)判斷循環(huán)變量是否為素?cái)?shù)，若是，則把它加到s1，否則應(yīng)該判斷循環(huán)變量i是否能被3和5整除，若能，則把它加到s2中，所以[11]處應(yīng)填“i Mod 3=0 And i Mod 5=0”。