2. 计算机
  3. 窗体上有一个名称为Command1的命令按钮，其单击事件过程及相关的代码如下： Private Sub Command1_Click() Dim x As Integer，y As Integer x=Val(InputBox("输入整数")) y=Val

窗体上有一个名称为Command1的命令按钮，其单击事件过程及相关的代码如下： Private Sub Command1_Click() Dim x As Integer，y As Integer x=Val(InputBox("输入整数")) y=Val

admin2016-06-23  40
问题 窗体上有一个名称为Command1的命令按钮，其单击事件过程及相关的代码如下：
Private Sub Command1_Click()
Dim x As Integer，y As Integer
x=Val(InputBox("输入整数"))
y=Val(InputBox("输入整数"))
Print Str(fun(x，y)+x+y)
End Sub
Private Function fun(ByRef 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://www.kaotiyun.com/show/bUID777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)