编写一个程序,其功能是:将两个两位数的正整数a,b合并成一个整数放在c中.合并的方式是

编写一个程序,其功能是:将两个两位数的正整数a,b合并成一个整数放在c中.合并的方式是？

Functionfun(aAsstring,bAsstring)dimxasstringdimyasstringdimmasstringdimnasstringdimnumasIntegerx=left(a,1)y=ringt(a,1)m=left(b,1)n=ringt(b,1)num=val(x)*1000 val(m)*100 val(y)*10 val(n)EndFunction