下述程序的运行结果是：PrivateSubCommand_Click()a=b=Callfun(a，b)Printa，bEndSubPrivateSubfun(x，y)x=x*yy=y+xEndSub