阅读以下说明及Visual Basic 程序代码，将应填入(n)处的字句写在对应栏内。
[说明]
本程序求3～100之间的所有素数(质数)并统计个数；同时将这些素数从小到大依次写入顺序文件E: /dataout.txt；素数的个数显示在窗体Form1上。
[Visual Basic 代码]
Private Sub Command1_ Click ( )
Dim count as integer, flag as Boolean
Dim t1 as Integer, t2 as Integer
(1)
Count=0
For t1=3 to 100
Flag=Tree
For t2=2 to Int( Sqr ( t1 ) )
If (2) Then flag=False
Next t2
(3)
count=(4)
write 1, t1
End if
Next t1
(5)
Close 1
End Sub

A.txt；素数的个数显示在窗体Form1上。


【参考答案】

(1) Open 'e:\dataout.txt' For Output as #1 (2) t1 mod t2=0(3......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)