摘要： Public Function cTon(ByVal sInNum As String, ByVal n As Double) As String'转换至n进制(n<=36) Dim dx As Double, iX As Long Const sNum As String = "0123456789ABCDEFGHIJKLMNoPQRSTUVWXYZ" ''Const sNum As St... 阅读全文