max=x;
if(y>max) max=y;
if(z>max) max=z;
不明白你说的if函数是什么意思,VB里有这样一个函数:IIF
max=iif(x>y,x,y)
max=iif(max>z,max,z)