02. Letters

Sub LetterProblem()
    Dim text As String
    text = "hello"

    Dim lengthText As Integer
    lengthText = Len(text)

    For i = 1 To lengthText
        Dim letter As String
        Debug.Print Mid(text, i, 1)

    Next i


End Sub