[紧急求助]求vb高手解决这一个问题,有赏,要解析

private sub command1 _click(),dim a,b,c,as integer,a =5,b=3,c=4print sec(a,b,c)end sub,function fir(x,y,z as integer)fir=2*x+y+3*z end fun,fun sec=(x,y,z as integer),sec=fir(z,x,y) +x end fun给过程和结果。
private sub command1_click()
dim a,b,c as integer
a=5
b=3
c=4
print sec(a,b,c)
end sub

Function fir(x,y,z as integer)
fir=2*x+y+3*z
end function
Funciton sec(x,y,z as integer)
sec=fir(z,x,y) + x
endf