在窗体中有一个命令按钮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 打开窗体运行后，单击命令按钮，输出的结果是（ ）。A.15B.20C.25D.35
在窗体中有一个命令按钮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 打开窗体运行后，单击命令按钮，输出的结果是（ ）。
A.15
B.20
C.25
D.35
相关考题：
若窗体Frml中有一个命令按钮Cmdl，则窗体和命令按钮的Click事件过程名A．Form_Click() Commandl_Click()B．Frml_Click() Commamdl_Click()C．Form_Click() Cmdl_Click()D．Frml_Click() Cmdl_Click()
在窗体中有一个标签Lablel，标题为“测试进行中”，有一个命令按钮Commandl，事件代码如下：Private Sub Commandl Click（ ）Lablel．Caption=”标签”End SubPrivate Sub Form—Load（ ）Form．Caption=”举例”Commandl．Caption=”移动”End Sub打开窗体后，单击命令按钮，屏幕显示（ ）。A.B.C.D.
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码： Pfivate Sub Command 1 Click（ ）窗体打开运行后，单击命令按钮，则消息框的输出结果是（ ）。A. 1B. 2C. 3D. 4
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a$="VisualBasic" Print String(3，a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是A．VVVB．VisC．sicD．11
在窗体中有一个命令按钮Commandl，编写事件代码如下：Private Sub Command1_CliCk()Dim s As Integers=P(1)+P(2)+e(3)+P(4)debug．Print SEnd SUbPublic Function P(N AS Integer)Dim Sum As IntegerSum=0For i=1 To NSum=Sum+iNext iP=SumEnd Function打开窗体运行后，单击命令按钮，输出结果是A．15B．20C．25D．35
在窗体中有一个标签Labele，标题为“测试进行中”：有一个命令按钮Commandl，事件代码如下：Private Sub Commandl_Click()Labele.Caption＝“标签”End SubPrivate Sub Form_Load()Form.Caption＝“举例”Commandl.Caption＝“移动”End Sub打开窗体后，单击命令按钮，屏幕显示( )。A．B．C．D．
在窗体中有一个标签Lbl和一个命令按钮Commandl，事件代码如下。 Option Compare DatabaseDim aAs String*10Private Sub Commandl_Click（ ） a="1234"b=Len（A． Me．Lbl．Caption=bEndSub打开窗体后单击命令按钮，窗体中显示的内容是（ ）。A.4B.5C.1OD.40
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click（） Dim（） a=Array（”机床”，”车床”，”钻床”，”轴承”）Printa（2）EndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。A.机床B.车床C.钻床D.轴承
在窗体中有一个标签Lbl和一个命令按钮Commandl，事件代码如下： Option Compare Database Dim a As String*10 Pfivae Sub Commandl_Click() a＝“1234” b＝Len(A) Me.Lbl.Caption＝b End Sub 打开窗体后单击命令按钮，窗体中显示的内容是( )。A．4B．5C．10D．40