Как создать массив с элементами английского алфавита? - VB

Sub Command1_Click()
    Dim b() As Byte: b() = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
 
    Dim Hello$, Char
    For Each Char In Array(14, 60, 74, 74, 80)
        Hello = Hello & Chr$(b(Char))
    Next
    
    Dim World$
    For Each Char In Array(96, 80, 86, 74, 58)
        World = World & Chr$(b(Char))
    Next
        
    MsgBox Format$(Hello, "@@@@@@!") & World
End Sub