Number Systems

Any To Any

    The previous code gives rise to a very simple Function.  This Function's purpose is to accept a number of any base and return its representation in any other base.
Public Function AnyToAny(ByVal Number As String, ByVal InputBase As_
 Short,ByVal OutputBase As Short) As String
Dim lDecimal As Long = AnyToDecimal(Number, InputBase)
Return DecimalToAny(lDecimal, OutputBase)
End Function

You might also like...



Why not write for us? Or you could submit an event or a user group in your area. Alternatively just tell us what you think!

Our tools

We've got automatic conversion tools to convert C# to VB.NET, VB.NET to C#. Also you can compress javascript and compress css and generate sql connection strings.

“We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil.” - Donald Knuth