下列程序的功能是：当发生窗体的单击事件时 求出3～1000之间的所有素数的和以及所有能被3和5整除的
下列程序的功能是：当发生窗体的单击事件时，求出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【 】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 【 】 Else prime=False End If End Function
请帮忙给出正确答案和分析，谢谢！
参考解答
482***262
2023-07-21 07:12:37
正确答案：i Mod 3=0 And i Mod 5=0 prime=True
本题Prime()函数的功能是判断形参n是否为素数，若是，则返回True，不是则返回False。具体分析请参看有关章节。要使函数返回一个值，必须在函数中给函数名赋值，故[12处应填“prime=True”。发生Form_Click事件时，将把3～1000之间的所有素数加到s1中，把能被3和5整除的数加到s2中，在循环中首先调用Prime()函数判断循环变量是否为素数，若是，则把它加到s1，否则应该判断循环变量i是否能被3和5整除，若能，则把它加到s2中，所以[11处应填“iMod3=0AndiMod5=0”。
相似问题
下列程序的功能是求出所有的1～100之间的孪生素数。孪生素数是指两个素数的差为2 如3和5 11和1
下列程序的功能是求出所有的1～100之间的孪生素数。孪生素数是指两个素数的差为2，如3和5，11和13等，请填空。 Private Sub Form_Click() Dim i As
图片按钮的【 】属性用来设置命令按钮无效时显示的图形。请帮忙给出正确答案和分析 谢谢！
图片按钮的【 】属性用来设置命令按钮无效时显示的图形。请帮忙给出正确答案和分析，谢谢！
在窗体上画一个列表框 然后编写如下两个事件过程： Private Sub Form_Click()
在窗体上画一个列表框，然后编写如下两个事件过程： Private Sub Form_Click() List1．RemoveItem 1 List1．Removeltem 3 List1．RemoveItem 1
随机生成的10个两位数 求出它们的总和和平均数。产生两位数采用的算法如下：分别产生个位数(0～9)和
随机生成的10个两位数，求出它们的总和和平均数。产生两位数采用的算法如下：分别产生个位数(0～9)和十位数(1～9)，然后十位数乘10再加上个位数即得到一
在窗体上画一个列表框 一个命令按钮和一个标签 其名称分别为List1 Command1和Labe11
在窗体上画一个列表框、一个命令按钮和一个标签，其名称分别为List1、Command1和Labe11，通过属性窗口把列表框中的项目设置为：“第一个项目”、“第二个
