在窗体中有一个名为Command1的命令按钮,Click事件的代码如下: Private Sub Command1_Click() f = 0 For n = 1 To 10 Step 2 f = f + n Next n Me!Lb1.Caption = f End Sub 单击命令按钮后,标签显示的结果是()。

在窗体中有一个名为Command1的命令按钮,Click事件的代码如下: Private Sub Command1_Click() f = 0 For n = 1 To 10 Step 2 f = f + n Next n Me!Lb1.Caption = f End Sub 单击命令按钮后,标签显示的结果是()。


参考答案和解析
C 弹出的是m(2+m(6)),m(6)=11—6=5,因此弹出的是m(2+5)=m(7)=11-7=4。

相关考题:

( 11 )在窗体中有一个名为 command 的命令按钮, click 事件的代码如下:private sub command1_click()f=0for n=1 to 10 step 2f=f+nnext nme!lb1.caption=fend sub单击命令按钮后,标签显示的结果是 ___[11]___ 。

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub CommaLndl_Click() For n=1 To 20 If n Mod 3<>0 Then m=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。A.15B.18C.21D.24

在窗体上添加一个命令按钮(名为Conunand1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码: Private Sub Command1_Click() m=2170 n=Len (Str$ (m) +Space (5)) Me! Text1=n End Sub打开窗体运行后,单击命令按钮,在文本框中显示( )。A.5B.8C.9D.10

在窗体中有一个命令按钮command1,编写事件代码如下: Private Sub Command1_Click() Dim s As 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=1 To N Sum=Sum+1 Next i P=Sum End Function 打开窗体运行后,单击命令按钮,输出的结果是( )。A.15B.20C.25D.35

在窗体中添加—个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() MsgBox f(24,18) End Sub Public Function f(m As Integer,n As Integer)As Integer Do while m<>n Do while m>n m=m-n Loop Do While m<n n=n-m Loop Loop f=m End Function 窗体打开并运行后,单击命令按扭,则消息框的输出结果是______。A.2B.4C.6D.8

在窗体中添加一个命令按钮(名为Command1) 和一个文本框(名为Text1) ,并在命令按钮中编写如下事例代码: Private Sub Command1_Click( ) Str1="981765" Str2="65" n=InStr(Str1,Str2) Me.Text1=n End Sub 窗体打开运行后,单击命令按钮,在文本框中显示______。A.4B.5C.6D.7

若窗体中已有一个名为Command1的命令按钮、一个名为Label 1的标签和一个名为Text 1的文本框,且文本框的内容为空,然后编写如下事件代码:Private Function f(x As Long) As BooleanIf x Mod 2=0 Thenf=TrueElsef=FalseEnd IfEnd FunctionPrivate Sub Command1_Click( )Dim n As Longn=Val(Me!text1)p=IIf(f(n) ,“Even

若窗体中已有一个名为Cmd的命令按钮、一个名为Label1的标签和一个名为Text1的文本框,且文本框的内容为空,然后编写如下事件代码:Private Function f(x As Long) As BooleanIf x Mod 2=0 Thenf=FalseElsef=TrueEnd IfEnd FunctionPrivate Sub Cmd_Click( )Dim n As Longn=Val(Me! text1)p=IIf(f(n), "奇数“,"偶数")Me! Labell. Caption=n"是"pEnd Sub窗体打开运行后,在文本框中输入11,单击命令按钮,则标签显示内容为【 】。

在窗休中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() Dim a(10,10) For m=2 To 4 For n=4 To 5 a(m,n)=m*n Next n Next m MsgBox a(2,5)+a(3,4)+a(4,5) End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果是______。A.22B.32C.42D.52

在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码: Private Sub Command1_Click() m=2.17 n=Len(Str$(m)+Space(5)) Me!Text1=n End Sub 打开窗体运行后,单击命令按钮,在文本框中显示______。A.5B.8C.9D.10

在窗体上画—个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click_() For n=1 To 20 If n Mod 3<>0 Then m=m+n\3 Next n print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是 ______。A.15B.18C.21D.24

在窗体上添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click( ) Dim a(10,10) For m=2 To 4 For n=4 TO 5 a(m,n)m*n Next n Next m MsgBox a(2,4)+a(3,5)+a(4,5) End Sub 打开窗体运行后,单击命令按钮,则消息框的输出结果是( )。A.23B.33C.43D.53

若窗体中已有一个名为Commandl的命令按钮、一个名为Labell的标签和一个名为Textl的文本框,且文本框的内容光焕发为空,然后编写如下事件代码: Private Function fx As Long. As Boolean If x Mod 2 =0 Then f =True Else f =False End If End Function Privare Sub Commandl_Click. Dim n As Ling n =ValMeltextl. p=Iiffn.,”Even number”,”Odd number’ Me!Labell.Caption=n&“is” &p End Sub 窗体打开运行后,在文本框中输入21,单击命令按钮,则标签显示内容为 【12】

若窗体中已有一个名为Command1的命令按钮、一个名为Labell的标签和一个名为Text1的文 本框,且文本框的内容为空,然后编写如下事件代码:Private Function f(X As Long)As BooleanIf x Mod2=0 Thenf=TrueElsef=FalseEnd IfEnd FunctionPrivate Sub Command1_ Click()Dim n As Longn=Val(Me!text1)p=Ⅱf(f(n),"Even number","Odd number")Me!Labell.Caption=n "is" pEnd Sub窗体打开运行后,在文本框中输入21,单击命令按钮,则标签显示内容为【 】。

在窗体中有一个名为run34的命令按钮,事件代码如下: Private Sub run34_Click( ) f1=1 f2=1 For n=3 T0 7 F=f1+f2 f1=f2 f2= f Next n MsgBox f End Sub 打开窗体,单击命令按钮,消息框的输出结果是( )。A.8B.13C.21D.其他结果

在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n = 1 To 20 If n Mod 3 <> 0 Then m = m + n \ 3 Next n print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是A.15B.18C.21D.24

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n=1 To 20 If n Mod 3<>0 Then m=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。A.15B.18C.21D.24

在窗体中有一个名为Command1的命令按钮,事件代码如下: Private Sub Command1_Click( ) Dim m(10) For k=1 T0 10 m(k)=11=k Next k x=6 MsgBox m(2+m(x)) End Sub 打开窗体,单击命令按钮,消息框的输出结果是( )。A.2B.3C.4D.5

在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出结果为( )。 Private Sub p1(n As Integer) For i=n To 1 Step-1 x=String(i,"*") Print x Next i End Sub Private Sub Command1_Click() p1(3) End SubA.*** ** *B.* ** ***C.* * *D.******

在窗体中有一个名为run34的命令按钮,事件代码如下:Private Sub run34_Click( )f1=1f2=1For n=3 T0 7F=f1+f2f1=f2f2= fNext nMsgBox fEnd Sub打开窗体,单击命令按钮,消息框的输出结果是( )。A.8B.13C.21D.其他结果

在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click() Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print s End Sub 程序运行后,单击命令按钮,在窗体上显示的是A. 11B.10C.9D.8

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x(5)As String Dim n AS Integer For n : 4 TO 0 Step -1 x(n)= n + 1 Print x(n); Next n End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.54321B.4C.54321D.0

窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框,事件代码如下: Private Sub Command1_Click Dim a(10)As Integer,b(10)As Integer n=3 For i=1 T0 5 a(i)=i b(n)=2*n+i Next i Me!Text1=a(n)+b(n) End Sub 打开窗体,单击命令按钮,文本框Text1中显示的内容是( )。A.13B.14C.15D.16

在窗体中有一个标签Lb1和一个命令按钮Command1,事件代码如下: OPtion Compare Databse Dim a As String * 10 Private Sub COmmand1_Click() a="1234" b=Len(a) Me.Lbl.Caption=b End Sub 打开窗体后单击命令按钮,窗体中显示的内容是A.4B.5C.10D.40

设有一个命令按钮Command1的事件过程以及一个函数过程。程序如下: Private Sub Command1 Click( ) Static x A S Integer x=f(x+5) Cls Print X End Sub Private Function f(x As Integer)As Integer f=x+x End Function 连续单击命令按钮3次,第3次单击命令按钮后,窗体显示的计算结果是( )。A.10B.30C.60D.70

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click() For n=1 To 20 If n Mod 3<>0 Then m=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。A.15B.18C.21D.24

在窗体中有一个标签Lb1和一个命令按钮Command1,事件代码如下: Option Compare Database Dim a AS String*10 Private Sub Command1_Click() a=“1234” b=Len(a) Me.Lb1.Caption=b End Sub 打开窗体后单击命令按钮,窗体中显示的内容是( )。A.4B.5C.10D.40

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n=1 To 20 If n Mod 3<>Then m=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是 ______。A.15B.18C.21D.24