Code:
        For i = 0 To ListBox1.Items.Count - 1
            For a As Integer = 0 To stringname(30)
                stringname(a) = ListBox1.Items(i).ToString
                If a > ListBox1.Items.Count Then
                    Exit For
                End If
                stringname(a) = MessageTransposition(stringname(a), True)
            Next
        Next
That is my looping code which works fine other than it doesn't increase the value of "a" every loop. "a" is always = 0. I am very new to loops (been messing around with them for an hour maybe two) so I don't know why it doesn't increase. I thought it had to cause it is a loop but really wouldn't know. So if there is anyone out there who can help me please feel free to speak up.

Thank you.