【单选题】|在窗体中有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl_Click( ) Dim SAsIntegerS=P(1)+P(2)+P(3)十P(4)debu9.Print SEnd SubPublic Function PfN AS Integer)Dim Sum As IntegerSum=0Fori=l ToNSum=Sum+iNextiP=SumE...
【单选题】在窗体中有一个命令按钮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+...