'Namespace' statement must end with a matching 'End Namespace'.

[Prathap]

I am getting this error,here is my code.thanks

Public Class Sample2
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim counter As Integer
        counter = 1
        While (counter <= 10)
            MessageBox.Show("Counter Now is : counter")
            counter = counter + 1
        End While
    End Sub
End Class

[kadghar]

use WEND instead of End While

[Prathap]

Thanks for your response, but an error showing WEND is not supported

[kadghar]

I really don't see the error then, perhaps you're opening a namespace before this code, but never closing it.

[Prathap]

thanks, the error is "WEND statements are no longer supported;use End while statements instead"

Public Class Sample2
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim counter As Integer
        counter = 1
        While (counter <= 10)
            MessageBox.Show("Counter Now is : counter")
            counter = counter + 1
        wEnd While
    End Sub
End Class