( 8 )窗体上有名称为 Command1 的命令按钮。事件过程及 2 个函数过程如下:Private Sub Command1_Click()Dim x As Integer,y As Integer,zx=3y=5z=fy(y)print fx(fx(x)),yEnd SubFunction fx(ByBal a As Integer)a=a+afx=aEnd FunctionFunction fy(ByRef a As Integer)a=a+afy=aEnd Function运行程序,并单击命令按

题目

( 8 )窗体上有名称为 Command1 的命令按钮。事件过程及 2 个函数过程如下:

Private Sub Command1_Click()

Dim x As Integer,y As Integer,z

x=3

y=5

z=fy(y)

print fx(fx(x)),y

End Sub

Function fx(ByBal a As Integer)

a=a+a

fx=a

End Function

Function fy(ByRef a As Integer)

a=a+a

fy=a

End Function

运行程序,并单击命令按钮,则窗体上显示的 2 个值依次是 【 12 】 和 【 13 】 。


相似考题
更多“( 8 )窗体上有名称为 Command1 的命令按钮。事件过程及 2 个函数过程如下:Private Sub Command1_C ”相关问题
  • 第1题:

    窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是( )。


    正确答案:C
    B)    【解析】窗体的单击事件不同于其他控件的单击事件,在事件过程头中不出现窗体名字,而是统一使用Form. Click0。

  • 第2题:

    在窗体上有一个命令按钮Command1,通用过程fun和命令按钮的事件过程如下: Private Function fun(ByVal m As Integer) If m Mod 2 = 0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_Cliek() Dim i As Integer, s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后,单击命令按钮,则窗体上输出( )。

    A.6

    B.7

    C.8

    D.9


    正确答案:B
    解析:本题比较简单,只要根据程序的执行条件和顺序就可以运算出该程序的最后输出结果。程序运算过程为:当i=1时,s=s+fun(i)=1当i=2时,s=s+fun(i)=3,当i=3时,s=s+fun(i)=4;当i=4时,s=s+fun(i)=6;当i=5时,s=s+fun(i)=7。

  • 第3题:

    设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是()。

    A.窗体的Click事件过程的过程名是Myform_Click

    B.命令按钮的Click事件过程的过程名是Command_Click

    C.命令按钮的Click事件过程的过程名是Command1_Click

    D.命令按钮的Click事件过程的过程名是C1_Click


    B

  • 第4题:

    在窗体上有一个命令按钮Command1,通用过程fun和命令按钮的事件过程如下:

    Private Function fun(ByVal m As Integer)

    Ifm Mod2=0 Then

    fun=2

    Else

    fun=1

    End If

    End Function

    Private Sub Command1_Click()

    Dim i As Integer,s As Integer

    s=0

    For i=1 To 5

    s=s+fun(i)

    Next

    Prints

    End Sub

    程序运行后,单击命令按钮,则窗体上输出( )。

    A.6

    B.7

    C.8

    D.9


    正确答案:B
    解析:本题比较简单,只要根据程序的执行条件和顺序就可以运算出该程序的最后输出结果。程序运算过程为:当i=1时,s=s+fun(i)=1;当i=2时,s=s+fun(i)=3;当i=3时,s=s+fun(i)=4;当i=4时,s=s+fun(i)=6;当i=5时,s=s+fun(i)=7。

  • 第5题:

    (6)在窗体上有1个名称为Command 1的命令按钮,并有如下事件过程和函数过程:

    Private Sub Command 1_Click()

    Dim p As Integer

    p=m(1)+m(2)+m(3)

    Print p

    End Sub

    Private Function m(n As Integer) As Integer

    Static s As Integer

    For k=1 To n

    s=s+1

    Next

    m=s

    End Function

    运行程序,单击命令按钮Command 1的输出结果为【6】。


    正确答案:
    (6)10