Transformar de base64 a decimal

 Dim array As Byte() = Convert.FromBase64String("AQAB")
 Dim hex As String = BitConverter.ToString(array).Replace("-", String.Empty)
 Dim n As Integer = Val("&H" & hex)

Dim n1 As Integer = Val("&H" & BitConverter.ToString(Convert.FromBase64String("AQAB")).Replace("-", String.Empty))


fuente1
fuente2