题目内容:
下列程序用于在带垂直滚动条的文本框Text1中输出3到100之间的全部素数。请填空。Private Sub Command1_click() Text1.Text="" For n=3 to 100k=Int(Sqr(n))i=2Flag=0Do While i<= ______And Flag=0 If n Mod i=0 Then Flag=1 Else i=i+1 End IfLoopLf ______Trhen Text1.Text=Text1.Text & Str(n) & Chr(13) & Chr(10)End If Next nEnd Sub
参考答案:
答案解析: