Я получаю два выражения ожидаемой ошибки на byval, что мне делать?

---

Public Class Form1

    Public Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ComboBox1.Items.Add("thankyou")
        ComboBox1.Items.Add("myproject")


        If ComboBox1.Text = "thankyou" Then


    Public AxWindowsMediaPlayer1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AxWindowsMediaPlayer1.enter
            Dim startSoundPlayer As System.Media.SoundPlayer
            startSoundPlayer = New System.Media.SoundPlayer("C:\Users\Natasha\Music\migente.wav")


            InitializeComponent()
            AxWindowsMediaPlayer1.URL = "C:\Users\Natasha\Music\migente.wav"

            startSoundPlayer.Play()


            MessageBox.Show("Congratulations!")
            Close()

        ElseIf ComboBox1.Text = "myproject" Then
              Public AxWindowsMediaPlayer1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AxWindowsMediaPlayer1.Enter
            Dim startSoundPlayer As System.Media.SoundPlayer
            startSoundPlayer = New System.Media.SoundPlayer("C:\Users\Natasha\Music\pooja.wav")


            InitializeComponent()
            AxWindowsMediaPlayer1.URL = "C:\Users\Natasha\Music\pooja.wav"

            startSoundPlayer.Play()


            MessageBox.Show("Congratulations!")
            Close()

        End If
    End Sub
End Class

What I have tried:

i have tried changing handles,but i dnt know how to change it,im only getting an error on the> ByVal .

---