在Visual Basic（或伪代码算法）中查找小数到字母数字基本转换器库无递归

Question

我正在寻找一个小数点到字母数字数字基本转换器库在Visual Basic中不使用递归。

我发现： http://visualstudiomagazine.com/articles/2010/07/20/when-hexadecimal-is-not-enough.aspx

，其中包括一个演示应用程序，但发现它使用递归。当我尝试将库集成到我自己的Visual Studio Express 2010 Visual Basic项目中时，使用递归的问题变得明显：我得到了堆栈溢出异常。

现在我可以考虑增加分配给堆栈的内存大小，但可能很难确定这是什么，因为递归深度可能会根据要转换的值而有所不同。

我的情况需要一个可靠的确定性解决方案，所以我宁愿打折使用递归的想法。

我会做更多的研究，并努力从头开始编写算法，但宁可不重新发明轮子，如果它已经存在，所以这个问题。在这里搜索并没有给我我想要的东西。

您可以指向一个现有的非递归十进制方向字母数字转换器库在Visual Basic中吗？

Answer 1

我给自己提供的这个解决方案看起来很有效 - 太简单了！但那是因为它是单向转换;其他图书馆的目标是在不同基地之间来回转换，但我不需要两种方式。

Public Class BaseConverter 


    Public Shared Function ConvertToBase(num As Integer, nbase As Integer) As String 

     Dim retval = "" 

     Dim chars As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZ" 

     ' check if we can convert to another base 
     If (nbase chars.Length) Then 
      retval = "" 
     End If 

     Dim r As Integer 

     Dim newNumber As String = "" 

     ' in r we have the offset of the char that was converted to the new base 
     While num >= nbase 
      r = num Mod nbase 
      newNumber = chars(r) & newNumber 

      'use: num = Convert.ToInt32(num/nbase) 
      '(if available on your system) 
      'otherwise: 
      num = num \ nbase 
      ' notice the back slash \ - this is integer division, i.e the calculation only reports back the whole number of times that 
      ' the divider will go into the number to be divided, e.g. 7 \ 2 produces 3 (contrasted with 7/2 produces 3.5, 
      ' float which would cause the compiler to fail the compile with a type mismatch) 
     End While 

     ' the last number to convert 
     newNumber = chars(num) & newNumber 

     Return newNumber 
    End Function 


End Class 

我创建Visual Basic中的上述代码基于在下面的链接C＃代码：

CREDIT：http://social.msdn.microsoft.com/Forums/en-US/csharpgeneral/thread/5babf71f-4375-40aa-971a-21c1f0b9762b/ （“从十进制（基-10）至字母数字转换（基数36） “）

public String ConvertToBase(int num, int nbase) 
{ 
    String chars = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"; 

    // check if we can convert to another base 
    if(nbase chars.Length) 
     return ""; 

    int r; 
    String newNumber = ""; 

    // in r we have the offset of the char that was converted to the new base 
    while(num >= nbase) 
    { 
     r = num % nbase; 
     newNumber = chars[r] + newNumber; 
     num = num/nbase; 
    } 
    // the last number to convert 
    newNumber = chars[num] + newNumber; 

    return newNumber; 
} 

@assylias我不能让devx.com/vb2themax/Tip/19316工作 - 我得到了错误的值回。谢谢你的建议。

没有证据表明它有效。我调整了代码的一些声明和肤浅的结构，以便在Visual Studio Express 2010 Visual Basic中成功构建它。然后逐步介绍Visual Studio Express 2010 Visual Basic调试器中的代码，代码很难遵循：变量名称不明显，没有评论为什么它正在做它正在做的事情。从我所了解的情况来看，它似乎不应该那样做基础转换。