Erreur de code en vb.net 2010

Bonjour,
je suis bloqué dans ma programmation d'une application en visual studio 2010. je ne comprend pas car tous semble être normal voici le syntaxe:

Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged

       Dim ajout GestionDataSet.EXAMENRow()

        Enregistrer = GestionDataSet.EXAMEN.NewRow

        If TextBox1.Text = "" Or TextBox2.Text = "" Then
            MsgBox("il y a un des champs qui estTextBox3.Text = "" vide, Veuillez remplir le ou les champs Vides SVP")
        Else
            Try
                Enregistrer.CodeExam = TextBox1.Text
                Enregistrer.NomExam = TextBox2.Text

                GestionDataSet.EXAMEN.Rows.Add(Enregistrer)
                EXAMENTableAdapter.Update(GestionDataSet.EXAMEN)

                MessageBox.Show("Enregistrement réussi", "Information", MessageBoxButtons.OK, MessageBoxIcon.Information)

                TextBox1.Text = ""
                TextBox2.Text = ""

            Catch ex As Exception
                MessageBox.Show("Enregistrement Impossible", "Erreur", MessageBoxButtons.OK)

            End Try

        End If

    End Sub
    Private Function Enregistrer() As Object
        Throw New NotImplementedException
    End Function

    Private Sub RadioButton5_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton5.CheckedChanged
        TextBox1.Text = ""
        TextBox2.Text = ""
        TextBox3.Text = ""
    End Sub

    Private Sub RadioButton2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton2.CheckedChanged
        If GestionDataSet.EXAMEN.Rows.Count <> 0 Then
            EXAMENBindingSource.RemoveCurrent()
            EXAMENTableAdapter.Update(GestionDataSet.EXAMEN)
            MsgBox("l'enregistrement a été Supprimé", MsgBoxStyle.Information)
            GoTo x
x:
        Else
            MsgBox("Aucun enregistrement a supprimé", MsgBoxStyle.Information)
        End If
    End Sub

la déclaration a t -elle de problème? si oui que faire?

EDIT : Ajout des balises de code (la coloration syntaxique). Explications disponibles ici : ICI Merci d'y penser dans tes prochains messages.