以下程序完成的功能是输入一个数n,并判断它是否为素数,是或不是都通过消息对话框(MsgBox)来给出提示。请将程序补充完整。 Private Sub Cemmand1_Click() n = InputBox (“请输入一个整数”) k = Int(Sqr(n)) i = 2 Flag = 0 do while i<= k And Flag = 0 if【 】 = 0 then Flag = 1 Else i= i+ 1 End if Loop if【 】then MsgBox “这是一个素数!”,vbOKOnly,“提示” Else MsgBox “这不是一个素数!”,vbOKOnly,“提示” End if End Sub