在窗体中有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl_Click() Dim sAs Integer S=P(1)+P(2)+P(3)+P(4) deb

admin2013-10-28  33

问题 在窗体中有一个命令按钮Commandl,编写事件代码如下:
    Private Sub Commandl_Click()
        Dim sAs Integer
        S=P(1)+P(2)+P(3)+P(4)
        debug.Print S
    End Sub
    Public Function P(N AS Integer)
    Dim Sum As Integer
    Sum=0
    For i=l TO N
    Sum=Sum+i
    Next i
    P=Sum
    End Function
    打开窗体运行后,单击命令按钮,输出结果是

选项 A、15   
B、20   
C、25
D、35

答案B

解析
转载请注明原文地址:https://jikaoti.com/ti/hEV0FFFM
0

最新回复(0)