人们常使用计算机程序解决一些实际问题。下面的程序可以找出能被3、5、7除，余数为1的最小的五个正整数。请分析程序回答问题。
Private Sub Command1_Click()
Dim CountN%,n%
CountN=0
n=1
Do
n=n+1
If       ①       Then
Print n
CountN=Countn+1
End If
Loop        ②      
End Sub
（1）变量CountN 的数据类型定义为（    ）

A．integer

B．single

C．double

D．string

（2）这是一段             结构程序。
（3）认真阅读程序，在带序号的空白处补充恰当的语句，完善程序。
（4）在编写程序时，首先需要找出解决问题的方法和步骤，此过程就是通常所说的