十万火急!急求VB高手帮我做一下这倒程序改错题,每个FOUND的下一行都有错误,请改正!
问题描述：
十万火急!急求VB高手帮我做一下这倒程序改错题,每个FOUND的下一行都有错误,请改正!
'【程序改错】
'------------------------------------------------
'题目：以下程序段用于输出100-300的所有素数
'------------------------------------------------
Option Explicit
Private Sub Form_Click()
Dim n As Integer, k As Integer, i As Integer, swit As Integer
For n = 101 To 300 Step 2
k = Int(Sqr(n))
i = 2
'
i = i - 1
End If
Wend
If swit = 0 Then
Print n;
End If
Next n
End Sub
答
Private Sub Form_Click()Dim n As Integer,k As Integer,i As Integer,swit As IntegerFor n = 101 To 300 Step 2k = Int(Sqr(n))i = 2'i = i + 1End IfWendIf swit = 0 ThenPrint n;End IfNext nEnd Sub你估计自己这三个空能答对几个？我就要考试了，很着急，需要正确答案。肯定全部正确，经过测试的。