Listing Prime numbers within a group of numbers

[sosarya]

Hello!

How can I re-write this program with using arrays this time?
Thank you

 Dim lowerLimit, upperLimit, primeNumber As Integer

        Dim isPrime As Boolean = False



        lowerLimit = CType(TextBox1.Text, Integer)

        upperLimit = CType(TextBox2.Text, Integer)



        Do While lowerLimit < upperLimit



            primeNumber = lowerLimit



            If primeNumber = 2 Or primeNumber = 3 Then

                isPrime = True

            ElseIf primeNumber = 1 Then

                isPrime = False

            ElseIf primeNumber = upperLimit Then

                Exit Do

            Else

                For i As Integer = 2 To (primeNumber - 1)

                    If primeNumber Mod i = 0 Then

                        isPrime = False

                        Exit For

                    Else

                        isPrime = True

                    End If

                Next

            End If



            If isPrime = True Then

                TextBox3.Text += primeNumber & vbCrLf

            End If



            lowerLimit += 1

        Loop