Partial Class Customers_Default2
    Inherits System.Web.UI.Page

    Protected Sub Button1_Click(sender As Object, e As EventArgs)
        If String.IsNullOrEmpty(TextBox1.Text) = False Then
            Dim vals As New List(Of String)
            Dim finalstr As String = ""
            For i As Integer = Integer.Parse(TextBox1.Text) To Integer.Parse(TextBox2.Text)

                Dim strtemp As String = ""
                VERAG_VARIABLES.seterrorcount(Integer.Parse(i))
                vals.Add(i.ToString + Space(3) + ":" + Space(3) + VERAG_VARIABLES.geterrornumb)

            Next
            For Each val As String In vals
                finalstr = finalstr + Environment.NewLine + val + Environment.NewLine
            Next
            Label2.Text = finalstr
        End If
    End Sub
End Class