编写一个程序,其功能是：将两个两位数的正整数a,b合并形成一个整数放在c中.合并的方式是：将a数的十位和个位数依次放在c数的千位和十位上,b数的十位和个位数依次放在c数的百位和个位

Question

编写一个程序,其功能是：将两个两位数的正整数a,b合并形成一个整数放在c中.合并的方式是：
将a数的十位和个位数依次放在c数的千位和十位上,b数的十位和个位数依次放在c数的百位和个位上.例如,a=45,b=12,执行程序后,c=4152

Answer 1

Function fun(a As string,b As string)
dim x as string
dim y as string
dim m as string
dim n as string
dim num as Integer
x=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)
End Function