窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Dim i As Integer For i=1 To 500 If p(i)Then s=s+1 Next Pr

admin2016-06-23  25

问题 窗体上有一个名称为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
关于上述程序,以下叙述中正确的是

选项 A、程序功能是统计1—500范围内能被7整除的整数个数
B、Command1_Click事件过程中If语句的条件表达式不完整
C、Function过程定义有误,函数过程p的名称与该过程中的变量名p相同
D、函数过程p的返回值为Boolean类型

答案D

解析 程序功能是统计1—500范围内不能被7整除的整数个数;函数过程p的返回值根据函数定义可知为Boolean类型。选D。
转载请注明原文地址:https://jikaoti.com/ti/kNkiFFFM
0

相关试题推荐
最新回复(0)