2. 计算机
  3. 窗体上有一个名称为Command1的命令按钮，其单击事件过程及相关的函数过程如下： Private Sub Command1_Click() Dim i As Integer For i = 1 To 500 If p(i)

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

admin2015-08-28  27
问题 窗体上有一个名称为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/pOJ0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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