用\和mod运算符来做这道vb？？谢谢~~~

1.\和mod运算符的练习熟悉整除“\”和取余“mod”这两个运算符。输入一个五位数，配合这两个运算符取得五位数的各位数值。万位千位百位十位个位

dim n as integer
n=val(text1.text)
print "万位:";n\10000
print "千位:";n\1000 mod 10
print "百位:";n\100 mod 10
print "十位:";n\10 mod 10
print "个位:";n mod 10

关键思路： 1一个整数mod 10的结果，是这个数的个位。例如 342 mod 10 ＝2 2一个整数\ 10的结果，是去掉这个数的个位，例如 342 \ 10＝34 具体怎么做，自己写

先运算优先级高的

运算符 _ 含义 _ 优先级
^ _ 乘方 _ 1
- _ 负号 _ 2
* _ 乘 _ 3
/ _ 除 _ 3
\ _ 整除 _ 4
mod _ 取模（取余） _ 5
+ _ 加 _ 6
- _ 减 _ 6