下列程序用于在带垂直滚动条件的文本框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
主观题
下列程序用于在带垂直滚动条件的文本框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