PrivateSubCommand1_Click()DimmAsInteger,nAsInteger,pAsIntegerm=3:n=5:p=0CallY(m,n,p)//调用函数Y,把m=3:n=5:p=0这几个参数传递进去,然后执行函数Y里面的内容k=i+jPrintStr(p)//也就是刚开始传递的时候i=m=3;j=n=5;k=p=0,然后执行k=i+j=8,而p=k=8EndSub//所以执行PrintStr(p)时输出的p就是8SubY(ByValiAsInteger,ByValjAsInteger,kAsInteger)k=i+jEndSub