为自己加油

下列程序是判断一个整数（>=3）是否为素数，请补充完整。

Private Sub Command1_Click()

Dim n As Integer, i, k, prime As Integer

n=InputBox("请输入一个整数（>=3）")

k=Int(Sqr(n))

i=(1)__________

prime=0

While i<=k And prime=0

If n Mod i=0 Then

(2)__________

End If

i=(3)__________

Wend

If prime=1 Then

Print n;"不是素数"

Else

Print n;"是素数"

End IfEnd Sub

下列程序是判断一个整数（>=3）是否为素数，请补充完整。

（1）2（2）prime=1（3）i+1