![[填空题] 以下程序完成的功能是输入一个数n，并判断它是否为素数，是或不是都通过消息对话框(MsgBox)来给出提示。请将程序补充完整。Private Sub Cemmand1_Click() n =](http://www.mshxw.com/aiimages/31/251264.png "[填空题] 以下程序完成的功能是输入一个数n，并判断它是否为素数，是或不是都通过消息对话框(MsgBox)来给出提示。请将程序补充完整。Private Sub Cemmand1_Click() n =")
[填空题] 以下程序完成的功能是输入一个数n，并判断它是否为素数，是或不是都通过消息对话框(MsgBox)来给出提示。请将程序补充完整。Private Sub Cemmand1_Click() n = InputBox (“请输入一个整数”) k = Int(Sqr(n)) i = 2 Flag = 0 do while i＜= k And Flag = 0 if 【6】 = 0 then Flag = 1 Else i= i+ 1 End if Loop if 【7】 then MsgBox “这是一个素数!”，vbOKOnly，“提示” Else MsgBox “这不是一个素数!”，vbOKOnly，“提示” End ifEnd Sub
参考答案：
[6]n Mod i问题解析:
[7]Flag=0 求素数的计算可以从2至终值Sqr(n)，如果条件“n Mod i=0”成立(即余数为0)，“Flag=1”，a不是素数，否则“Flag=0”，a是素数，即可打印“这是一个素数!”。
