当前位置:编程学习 > VB >>

vb 怎么把36进制转换成 10 进制


vb 怎么把36进制转换成 10 进制 --------------------编程问答-------------------- 16吧?没有写错?
--------------------编程问答-------------------- 36进制转换 10 进制 --------------------编程问答-------------------- 0~9+A~Z?
--------------------编程问答-------------------- 数字有多大?
--------------------编程问答-------------------- 36 进制无疑是字符串了。10 进制结果要求是数字还是字符串?
--------------------编程问答-------------------- 跟十六进制的方式差不多吧,根据进制的权值和位数进行转换
100进制转10进进制也是类似的方法 --------------------编程问答--------------------
Dim basestr As String
Dim n36 As String
Dim n As Long
Dim L As Long
Dim i As Long
basestr = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
n36 = "Z7"
n = 0
For i = 1 To Len(n36)
    n = n * 36 + (InStr(basestr, Mid(n36, i, 1)) - 1)
Next
Debug.Print n

--------------------编程问答--------------------
引用 7 楼  的回复:
VB code
Dim basestr As String
Dim n36 As String
Dim n As Long
Dim L As Long
Dim i As Long
basestr = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
n36 = "Z7"
n = 0
For i = 1 To Len(n36)
    n = n * 36 + (In……


效率低了点,胜在简单易懂啊. 

元芳, 你怎么看? 元芳, 元芳!? 一会工夫跑哪去啦, 本官喊你来看代码啊. 

来啦, 来啦, 回禀大人, 在下这几天看得两眼昏花, 夜不成眠啊, 求求您就把我当成个易做图给放了吧.

......噗呲~~~~

元芳: "......大人您真恶心" --------------------编程问答-------------------- --------------------编程问答--------------------
引用 7 楼 zhao4zhong1 的回复:
Visual Basic code



12345678910111213

Dim basestr As StringDim n36 As StringDim n As LongDim L As LongDim i As Longbasestr = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"n36 = "Z7"n = 0 For i = 1 To ……

赵老师的代码确实简单易懂。 --------------------编程问答-------------------- 32进制吧? 。。。
补充:VB ,  COM/DCOM/COM+
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,