在窗体中有一个命令按钮Commandl,编写事件代码如下:
Private Sub Commandl Click( )
Dim S As Integer
s=p(1)q+p(2)q+p(3)+p(4)
debu9.Print S
End Sub
Public Function P(N As Integer)
Dim Sum As IntegerSum==0
For i=1 To N
Sum=Sum+1
Next i
P=Sum
End Function
打开窗体运行后,单击命令按钮,输出的结果是( )。
发布于 2022-05-13 21:29:28
登录后免费查看答案
关注者
0
被浏览
10