计算机二级
有如下函数过程。 Function Fun( By Val x As Integer,By Val y As Integer) As Integer Do While y ＜＞ 0 reminder = x Mod y xmy y = reminder Loop Fun = x End Function 以下调用函数的事件过程，该程序的运行结果是 Private Sub CommandT_Click( ) Dim a As Integer,b As Integer a = 100:b =25 x =Fun
题目
有如下函数过程。 Function Fun( By Val x As Integer,By Val y As Integer) As Integer Do While y ＜＞ 0 reminder = x Mod y xmy y = reminder Loop Fun = x End Function 以下调用函数的事件过程，该程序的运行结果是 Private Sub CommandT_Click( ) Dim a As Integer,b As Integer a = 100:b =25 x =Fun(a,B)Print x End Sub
A．0
B．25
C．50
D．100
参考答案和解析
解析：函数的参数传递分为按值传递和按地址传递。按值传递是指，实参直接将值传递给形参，形参不改变实参的值；按地址传递是指，实参将变量的地址传递给形参。在调用函数时要注意参数的传递方式，不同的传递方式，语句执行结果不同。
相似问题和答案
第1题：
执行x$=InputBox("请输入x的值")时，在弹出的对话框中输入123，在列表框List1选中第一个列表项，该列表项的内容为456，使y的值是123456的语句是( )。
A．y=Val(x$)+Val(Listl.List(0))
B．y=Val(x$)+Val(List1.List(1))
C．y=Val(x$)& Val(List1.List(0))
D．y=Val(x$) &Val(List1.List(1))
解析：x$表示变量x是字符类型变量，所以从InputBox函数输入的数据123是字符类型。从ListBox控件输入的数据肯定是字符类型。选中List1中的第1个列表项，该列表项应表示为Listl.List(0)。Val函数是将字符串转换为数值，两个数值相加的表达式运算结果是579。选项C是本题答案，虽然Val函数已经将字符转换为数值，这个表达式是两个数值进行“&”运算，但“&”运算忽略参与运算项的类型，而是强行施加“连接”运算，故得到的结果是123456。
第2题：
执行x$=In put Box(“请输入x的值”)时，在弹出的对话框中输入123，在列表框Listl选中第一个列表项，该列表项的内容为456，使y的值是123456的语句是( )。
A．y=Val(x$)＋Val(List l．List(0))
B．y=Val(x$)＋Val(List l．List(1))
C．y=Val(x$)&Val(List l．List(0))
D．y=Val(x$)&Val(List l．List(1))
解析：本题考查List Box控件属性，x$表示变量x是字符类型变量，所以从In put Box函数输入的数据123是字符类型。从List Box控件输入的数据肯定是字符类型。选中Listl中的第 1个列表项，该列表项应表示为List l．List(0)。 Val函数是将字符串转换为数值，两个数值相加的表达式运算结果是579。选项A不是本题答案，List l．List(1)是List l控件的第2个列表项，在本题中该值为空，故得到结果仍是123；选项B错误；选项C是本题答案，虽然Val函数已经将字符转换为数值，这个表达式是两个数值进行“&”运算，但“&”运算忽略参与运算项的类型，而是强行施加“连接”运算，故得到的结果是123456：选项D错误，因为 List l．List(1)不是列表框的第1个列表项，在本题中Val(List l．List(1))：0，该选项得到y值为 1230。答案为C。
第3题：
执行x=InputBox(”请输入x的值”)时，在弹出的对话框中输入l2，在列表框Listl选中第一个列表项，假设该列表项的内容为34，使Y的值是1234的语句是（ ）。
A)y--Val(x) Val((Listl．List(0)
B)y=Val(x) Val(Listl．List(1))
C)y=Val(x)&Val(Listl．List(O))
D)y=Val(x)&Val(Listl．List(1))
本题考查字符串连接和列表框的知识。列表框的List属性是一个数组，其各元素就是列表框中的列表项，第一个列表项对应的数组下标为0。由于列表框中的列表项和输入对话框的返回值都是字符串，在本题中使用了Val函数将其转换为数字，此时如果使用“ ”则会完成两个数字相加，故此只能使用“&”连接两个字符串。
第4题：
执行x＄=InputBox(“请输入x的值”)时，在弹出的对话框中输入123，在列表框Listl选中第一个列表项，该列表项的内容为456，使y的值是123456的语句是( )。
A．y=Val(x＄)+Val(List1.List(0))
B．y=Val(x＄)+Val(List1.List(1))
C．y=Val(x＄)&Val(List1.List(0))
D．y=Val(x＄)&Val(List1.List(1))
解析：本题考查ListBox控件属性，x＄表示变量x是字符类型变量，所以从InputBox函数输入的数据123是字符类型。从ListBox控件输入的数据肯定是字符类型。选中List1中的第 1个列表项，该列表项应表示为List1.List(O)。 Val函数是将字符串转换为数值，两个数值相加的表达式运算结果是579。选项A不是本题答案，List1.List(”是List1控件的第2个列表项，在本题中该值为空，故得到结果仍是123；选项B错误；选项C是本题答案，虽然Val函数已经将字符转换为数值，这个表达式是两个数值进行“&．”运算，但“&”运算忽略参与运算项的类型，而是强行施加“连接”运算，故得到的结果是123456；选项D错误，因为 List1.List(1)不是列表框的第1个列表项，在本题中Val(List1.List(1)=0，该选项得到y值为 1230。答案为C。
第5题：
执行x=lnputBox{‘‘请输入x的值‘‘）时，在弹出的对话框中输入l2，在列表框Listl中选中第一个列表项，假设该列表项的内容为34，使Y的值是1234的语句是（ ）。
A.y=Val（x）+Val（（Listl．List（0））
B.y=Val（x）+Val（Listl．List（1））
C.y=Val（x）&；Val（Listl．List（0））
D.y=Val（x）&；Val（Listl．List（1））
暂无解析，请参考用户分享笔记
第6题：
执行x=InputBox(”请输入x的值”)时，在弹出的对话框中输入12，在列表框List1选中第一个列表项，假设该列表项的内容为34，使Y的值是1234的语句是（ ）。
A. y=Val(x)+Val((Listl．List(0))
B. y=Val(x)+Val(Listl．List(1))
C. y=Val(x)&Val(Listl．List(0))
D. y=Val(x)&Val(Listl．List(1))
本题考查字符串连接和列表框的知识。列表框的List属性是一个数组，其各元素就是列表框中的列表项，第一个列表项对应的数组下标为0。由于列表框中的列表项和输入对话框的返回值都是字符串，在本题中使用了Val函数将其转换为数字，此时如果使用“+”则会完成两个数字相加，故此只能使用“&”连接两个字符串。
第7题：
执行x＝InputBox("请输入x的值") 时，在弹出的对话框中输入12，在列表框List1选中第一个列表项，假设该列表项的内容为34，使y的值是1234的语句是( )。
A．y＝Val(x) +Val((Listl.List(0) )
B．y＝Val(x) +Val(Listl.List(1) )
C．y＝Val(x) &Val(Listl.List(0) )
D．y＝Val(x) &Val(Listl.List(1)
解析： 本题考查字符串连接和列表框的知识。列表框的List属性是一个数组，其各元素就是列表框中的列表项，第一个列表项对应的数组下标为0。由于列表框中的列表项和输入对话框的返回值都是字符串，在本题中使用了Val函数将其转换为数字，此时如果使用“+”则会完成两个数字相加，故此只能使用“&”连接两个字符串。
第8题：
执行x=InputBox(“请输入x的值”)时，在弹出的对话框中输入12，在列表框List1选中第一个列表项，假设该列表项的内容为34，使y的值是1234的语句是( )。
A．y=Val(x)+Val((List1.List(0))
B．y=Val(x)+Val(List1.List(1))
C．y=Val(x)&Val(List1.List(0))
D．y=Val(x)&Val(Listl.List(1))
解析：本题考查字符串连接和列表框的知识。列表框的List属性是一个数组，其各元素就是列表框中的列表项，第一个列表项对应的数组下标为0。由于列表框中的列表项和输入对话框的返回值都是字符串，在本题中使用了Val函数将其转换为数字，此时如果使用“+”则会完成两个数字相加，故在此只能使用“&”连接两个字符串。
第9题：
执行x=InputBox（”请输人x的值”）时，在弹出的对话框中输入12，在列表框Listl中选中第一个列表项，假设该列表项的内容为34，使y的值是1234的语句是（ ）。
A.y=Val（x）+Val（（Listl．List（0））
B.y=Val（x）+Val（Listl．List（1））
C.y=Val（x）&；Val（Listl．List（0））
D.y=Val（x）&；Val（Listl．List（1））
C．【解析】本题考查字符串连接和列表框的知识。列表框的List属性是～个数组，其各元素就是列表框中的列表项，第一个列表项对应的数组下标为0。由于列表框中的列表项和输入对话框的返回值都是字符串，在本题中使用了Val函数将其转换为数字，此时如果使用“+”则会完成两个数字相加，故此只能使用“&”连接两个字符串。
第10题：
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