Dim ge As Integer, shi As Integer, bai As Integer
'v是一个3位十进制整数
Dim v as Integer
v = 123
bai = v \ 100 '百位
v = v - v * bai
shi = v \ 10 '十位
ge = v Mod 10 '各位
设这个数为 x ，则
百位数 = x \ 100
十位数 = x \ 10 Mod 10
个位数 = x Mod 10
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024