Question

求助，求助，VB 题，非常感谢！

6、单击窗口时，下列程序的执行结果为（）
private sub s_value(ByVal m As Integer,ByVal n As Integer)
m=m*2:n=n-5
print m;n
end sub
private sub form_click()
dim x as integer, y as integer
x=10:y=15
call s_value(x,y)
print x;y
end sub
(a)20 10
20 10
(b)10 15
10 15
(c)20 15
20 15
(d)20 10
10 15
7、单击命令按钮时，下列程序代码的执行结果为多少？
function f_fir(x as integer, y as integer, z as integer)
f_fir=2*x+y+3+3*z
end function
function f_sec(x as integer,y as integer,z as integer)
f_sec=f_fir(z,x,y)+x
end function
private sub command1_click()
dim a as integer,b as integer, c as integer
a=2
b=3
c=4
print f_sec(c,b,a)
end sub

Answer 1

第6题的结果是D，因为
x=10:y=15
call s_value(x,y) ，（可以理解成
call s_value(10,15)
m=m*2:n=n-5 ，此时m=20；n=10
print m;n ，打印出 20 10）
print x;y ，打印出XY的值，依然是10 15

第7题的答案是24，同理，你用草稿纸慢慢代入计算即可得出24。

Answer 2

研究中

Answer 3

d 24