[填空题] 下列程序用于在带垂直滚动条件的文本框Text1中输出3～100字间的全部素数。请填空。 Privat Sub Command1_Click() Text1.Text="&qu

[填空题] 下列程序用于在带垂直滚动条件的文本框Text1中输出3～100字间的全部素数。请填空。

Privat Sub Command1_Click()

Text1.Text=""

For n=3 To 100

k=Int(Sqr(n))

i=2

Flag=0

Do While I＜=______And Flag=0

If n Mod i=0 Then

Flag=1

Eise

i=i+1

Else

loop

If ______ Then

Text1.Text=text1. Text ＆ Str(n) ＆ Chr(13) ＆ Chr(10)

End If

Next n

End Sub