vba的十进制转十以内的各种进制
Posted yihao529
tags:
篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了vba的十进制转十以内的各种进制相关的知识，希望对你有一定的参考价值。
Sub stor()
‘stor 为十进制转n进制 ’n<10
Dim stor, shi As Long
stor = "" ‘余数变量初始化为空
n = Range("b3")
shi = Range("a3")
’从表格内取值
Do While shi > 0
stor = shi Mod n & stor ’求除数
shi = Int(shi / n) ’计算剩下的值
Loop
Range("c3") = stor ‘显示结果
End Sub
以上是关于vba的十进制转十以内的各种进制的主要内容，如果未能解决你的问题，请参考以下文章