Public Shared Function GetCellNum(ByVal CellChars As String) As Integer

            Dim hash As String = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_"

            Dim NumChar1 As Integer = hash.IndexOf(CellChars(0)) * hash.Length
            Dim NumChar2 As Integer = hash.IndexOf(CellChars(1))

            Return NumChar1 + NumChar2

        End Function

        Public Shared Function GetCellChars(ByVal CellNum As Integer) As String

            Dim hash As String = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_"

            Dim CharCode2 As Integer = (CellNum Mod hash.Length)
            Dim CharCode1 As Integer = (CellNum - CharCode2) / hash.Length

            Return hash(CharCode1) & hash(CharCode2)

        End Function

        Public Shared Function GetDirChar(ByVal DirNum As Integer) As String

            Dim hash As String = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_"
            If DirNum >= hash.Length Then Return ""
            Return hash(DirNum)

        End Function

        Public Shared Function GetDirNum(ByVal DirChar As String) As Integer

            Dim hash As String = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_"
            Return hash.IndexOf(DirChar)

        End Function

public static int GetCellNum(string CellChars)

{

  string hash = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_";



  int NumChar1 = hash.IndexOf(CellChars(0)) * hash.Length;

  int NumChar2 = hash.IndexOf(CellChars(1));



  return NumChar1 + NumChar2;



}



public static string GetCellChars(int CellNum)

{



  string hash = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_";



  int CharCode2 = (CellNum % hash.Length);

  int CharCode1 = (CellNum - CharCode2) / hash.Length;



  return hash(CharCode1) + hash(CharCode2);



}



public static string GetDirChar(int DirNum)

{



  string hash = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_";

  if (DirNum >= hash.Length) return ""; 

  return hash(DirNum);



}



public static int GetDirNum(string DirChar)

{



  string hash = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_";

  return hash.IndexOf(DirChar);



}