![](https://cos-cdn.shuashuati.com/pipixue-wap/2020-1230-1107-56/ti_inject-812ce.png)
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Dim i As Integer For i = 1 To 500 If p(i) Then s = s + 1 Next Print s End Sub Private Function p(x As Integer) As Boolean If x Mod 7 <> 0 Then p = True Else p = False End If End Function 关于上述程序,以下叙述中正确的是