两质数(素数)的差为2,称此对质数为质数对。下列程序是找出n以内的质数对,并成对显示结果。其中,函数s判断参数m是否为质数。请完成以下问题:

Function s(m) As Boolean
Dim i As Integer
______1_______
For i = 2 To Int(Sqr(m))
If m / i = 0 Then s = false ‘3
Next i
End Function
Private Sub Command1_click()
Dim i, n As Integer
Dim p1, p2 As Boolean
n = Val(Text1.Text)
p1 = s(3)
List1.Clear
For i = ______2_____
p2 = s(i)
If p2 = True Then List1.AddItem = Str(i - 2) + " " + Str(i) ‘4
p1 = p2
Next i
End Sub