现有以下程序：Private Sub Command1_Click()c1=0c2=
题型：单项选择题
问题：
现有以下程序：
Private Sub Command1_Click()
c1=0
c2=0
For i=1 To 100
If i mod 3 = 0 Then
c1=c1+1
ElseIf i Mod 7 =0 Then
c2=c2+1
End If
Next
Print c1+c2
End Sub
此程序运行后输出的是在1~100范围内（）。
A．同时能被3和7带队的整数个数
B．能被3或7整除的整数个数（同时被3和7整除的数只记一次）
C．能被3整除，而不能被7整除的整数个数
D．能被7整除，而不能被3整除的整数个数