窗体中有命令按钮Command1,事件过程如下:Public Function f(x As Integer)As IntegerDim y As Integerx=20y=2f=x*YEnd FunctionPrivate Sub Command 1_Click()Dim y As Integerstatic x As Integerx=10y=5y=f(x)Debug.Print x;yEnd Sub运行程序,单击命令按钮,则立即窗口中显示的内容是( )。A.10 5B.10 40C.20 5D.20

题目

窗体中有命令按钮Command1,事件过程如下:

Public Function f(x As Integer)As Integer

Dim y As Integer

x=20

y=2

f=x*Y

End Function

Private Sub Command 1_Click()

Dim y As Integer

static x As Integer

x=10

y=5

y=f(x)

Debug.Print x;y

End Sub

运行程序,单击命令按钮,则立即窗口中显示的内容是( )。

A.10 5

B.10 40

C.20 5

D.20 40


相似考题
更多“窗体中有命令按钮Command1,事件过程如下:Public Function f(x As Integer)As Integer Dim y As I ”相关问题
  • 第1题:

    设有如下通用过程: Public Function f(x As Integer) Dim y As Integer x = 20 y = 2 f = x * y End Function 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Commandl Click() Static x As Integer x = 10 y = 5 y = f(x) Print x;y End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是

    A.10 5

    B.20 5

    C.20 40

    D.10 40


    正确答案:C
    解析:本题主要考查传值与传地址的区别。在Command1的Click事件过程中, x=10以传地址的方式传给Function f(x As Integer)。而在这个函数过程中,x又被赋值20,所以此时变量x的值为20。y的值为20乘以2。所以正确答案为C。

  • 第2题:

    设有如下通用过程: Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Static x As Integer x=10 y=5 y=f(x) Print x;y End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是

    A.10 5

    B.20 5

    C.20 40

    D.10 40


    正确答案:C
    解析:在Commandl的Click事件过程中,x=10以传地址的方式传给Func-honf(xAsInteger)。而在这个函数过程中,x又被赋值20,所以此时变量x的值为20。y的值为20乘以2。

  • 第3题:

    11、下面哪些定义是类型正确的?

    A.f :: (Integer, Integer) -> Float f (x,y) = x / y

    B.f :: (Integer, Integer) -> Float f (x,y) = (fromInteger x) / (fromInteger y)

    C.f :: (Integer, Integer) -> Float f (x,y) = 3*x + y

    D.f :: (Integer, Integer) -> Integer f (x, y) = 3*x + y


    AFT 通常由含有一个双氢呋喃环和一个氧杂萘邻酮(香豆素)的基本架构单位构成 AFT 分为 黄曲霉毒素B1(AFB1)、黄曲霉毒素 B2 (AFB2) 黄曲霉毒素G1(AFG1)、黄曲霉毒素 G2(AFG2) 黄曲霉毒素M1(AFM1)、黄曲霉毒素 M2(AFM2) B1、G1的呋喃环氢键异构。M1型氢键变为羟基。 1比2呋喃环上多了一个双键。

  • 第4题:

    设有如下通用过程: Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程; Private Sub Command1_Click() Static x As Integer x=10 y=5 y=f(x) Print x;y End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.10 5

    B.20 5

    C.20 40

    D.10 40


    正确答案:C
    解析:在f过程中实参x的值被改变,值为20。而y的值是函数返回的值,为40。

  • 第5题:

    在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:

    Private Sub Command1_Click()

    x = -5

    If Sgn(x) Then

     y = Sgn(x ^ 2)

    Else

     y = Sgn(x)

    End If

    Print y

    End Sub

    程序运行后,单击命令按钮,窗体上显示的是( )。

    A.-5

    B.25

    C.1

    D.-1


    正确答案:C