题目内容
（请给出正确答案）
提问人：网友nivana999
发布时间：2022-01-06
[主观题]
（11）下列程序用于在带垂直滚动条的文本框Text1中输出3到100之间的全部素数。请填空。 Private 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 Else i=i+1 End If Loop If Then Text1.Text=Text1.Text&Str(n)&Chr(13)&Chr(10) End If Next n End Sub
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
查看官方参考答案
