以下程序的运行结果是：Privatesubcommand_click()Dimx%，y%，z%x=y=z=Callswap(x，y，z)Printx;y;zEndsubPublicsubswap(a%，b%，c%)Dimt%t=aa=cc=bb=tEndsub