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

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

admin2017-11-23  26
问题 窗体上有一个名称为Command1的命令按钮，其单击事件过程及相关的函数过程如下：
Private Sub Command1_Click()
    Dim i As Integer
    For i=1 To 500
           Ifp(i)Then s=s+1
    Next
    Print s
End Sub
Private Function p(x As Integer)As Boolean
    Ifx Mod 7<>0 Then
      P=True
    Else
      P=False
    End If
End Function
    关于上述程序，以下叙述中正确的是
选项 A、程序功能是统计1-500范围内能被7整除的整数个数
B、Commandl_Click事件过程中If语句的条件表达式不完整
C、Function过程定义有误，函数过程P的名称与该过程中的变量名P相同
D、函数过程P的返回值为Boolean类型
答案D
解析 调用Function过程要返回一个值，因此可以像内部函数一样在表达式中使用。如果在Function过程中省略“过程名=表达式”，则该过程返回一个默认值(数值函数过程返回0值；字符串函数过程返回空字符串)。因此，通常要在过程体中给“过程名”赋值。本题中函数p的返回值为Boolean类型，功能是判断参数x是否能被7整除，如果不能整除返回True，否则返回False。Ciomnlandl Click事件过程中使用了单行的If语句，不需要Else分支和EndIf语句。程序功能是统计1—500范围内不能被7整除的整数个数。
转载请注明原文地址:https://kaotiyun.com/show/RNGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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