窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下: Private Sub Command1_Click() Dim x As Integer,y As Integer x=Val(Inp

admin2015-08-13  26

问题 窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下:
    Private Sub Command1_Click()
        Dim x As Integer,y As Integer
        x=Val(InputBox("输入整数"))
        y=Val(InputBox("输入整数"))
        Print sty(flun(x,y) +x+y)
    End Sub
    Private Function fun(ByRd m As Integer,ByVal n As Integer)
        m=m * m
        n=n+n
        fun=m+n
    End Function
运行程序,单击命令按钮时,出现输入对话框,分别输入3、5,则窗体上显示的是(    )。

选项 A、27
B、28
C、33
D、38

答案C

解析 函数fun执行后,x值被改变,y值不变。即x=9,y=5;计算得结果为33,选C。
转载请注明原文地址:https://kaotiyun.com/show/LlQp777K
0

最新回复(0)