Como converter um valor hexadecimal em decimal

'Este exemplo mostra como converter um valor
'hexadecimal em decimal

Module Module1
  Sub Main()
    Dim hex As String = "FACE"
    Dim dec As Integer = Convert.ToInt32(hex, 16)

    Console.WriteLine(hex & " em decimal é " & dec)

    Console.WriteLine()
    Console.WriteLine("Pressione uma tecla para sair...")
    Console.ReadKey()
  End Sub
End Module