本文主要是介绍vb.net 十进制转为34进制,希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!
Function F_10to34(n As Long) As StringDim strResult As String = String.EmptyDim s As Strings = "0123456789ABCDEFGHJKLMNPQRSTUVWXYZ"DostrResult = Mid(s, (n Mod 34) + 1, 1) & strResultn = n \ 34Loop While n > 0Return strResultEnd Function
这篇关于vb.net 十进制转为34进制的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!