在我国古代《孙子算经》中曾经提出这样一个问题，原文是这样的：“今有物，不知其数，三三数之，剩二；五五数之，剩三；七七数之，剩二；问物几何？”试用枚举算法来解决这一个问题。现分析如下，所寻找之数为满足如下条件的自然数：以3除余2，以5除余3，以7除余2。程序将从自然数1开始依次寻找，逐一判断某一自然数是否满足全部条件，直至在指定范围内找到满足条件的所有自然数。程序代码如下，请补充完整。

Private Sub Command1_Click()
Dim sum As Integer 'sum 用来统计符合条件的自然数个数'
Dim n, max As Integer
List1.Clear
sum = 0
max = ____（1）____ '指定查找范围的最大自然数，Text1文本框中输入'
n = 0
Do While n <= max
n =" n" + 1 '从自然数1开始不断往上寻找'
If ________（2）_______Then
List1.AddItem Str(n) '找到后在List1中显示结果'
___________（3）_________
End If
Loop
List1.AddItem ("共计" + Str(sum) + "个")
End Sub
（1）__________________
（2）__________________
（3）__________________