sub stor ()
dim stor,shi as long
stor = ""
n = range("b3")
shi = range("a3")
do while stor >0
stor = shi mod n & stor
shi = shi / n
loop
range ("e3") =stor
end sub
sub stor ()
dim stor,shi as long
stor = ""
n = range("b3")
shi = range("a3")
do while stor >0
stor = shi mod n & stor
shi = shi / n
loop
range ("e3") =stor
end sub
本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。