用mid函数,格式我忘记了好像是a=mid(a,1,1)
第二天的回答
A="010"
A1=MID(A,1,1)
A2=MID(A,2,1)
MessageBox "百位数是"&a1&"十位数是"&a2