Console.WriteLine(ConvertLettersToNumbers("hello world"))
Private Function ConvertLettersToNumbers(ByVal value As String) As String
Dim alphabet As String = "abcdefghijklmnopqrstuvwxyz"
Dim numberValue As String = String.Empty
For x As Integer = 0 To value.Length - 1
numberValue &=(alphabet.IndexOf(value(x).ToString(), StringComparison.OrdinalIgnoreCase) + 1).ToString("00")