问题 填空题

下列程序的功能是找出被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

答案

参考答案:n Mod 5=1 And n Mod 7=1

解析: 本题空白处要实现的功能是一个数同时除以5和除以7的时候都余1,所以用逻辑表达式And。

选择题
单项选择题