填空题

下列程序的功能是找出被5、7除，余数为1的最小的5个正整数，请在程序空白处填入适当的语句，使程序可以完成指定的功能。
Private Sub Form Click()
Dim Ncount%，n%
Ncount=0
n=1
Do
n=n+1
If______Then
Debug．Print n
Ncount=Ncount+1
End If
Loop Until Ncount
End Sub