VB中如何从3位数中分离出各位数

问题描述:

VB中如何从3位数中分离出各位数

a=123
l=left("" &a ,1)
m=mid("" &a ,2,1)
r= right("" &a ,1)
l=int(a/100)
m=int((a-l*100)/10)
r=int(a-l*100-m*10)