VB 中有自带的函数
StrReverse
比如a="1231"
那么StrReverse(a)="1321"
你也可以单独提取这个数的个位和十位进行颠倒
比如a =31
那么a=right(a,1) & left(a,1)
left表示从字符串的左边开始,截取了一位,right表示从右边开始截取了一位