Удаление класса из коллекции

Public FireBalls As New List(Of MagicBolt)
 
Public Sub FireBall()
        Dim NewFireBall As New MagicBolt
        NewFireBall.ParentSprites = Me
        NewFireBall.LoadContent()
        Me.FireBalls.Add(NewFireBall)
        Me.MagicSongStart.Play()
        Me.MagicColdown = 1 * 100
    End Sub

Public Sub Update()
        If Me.MagicPosition.X + 32 > (Globals.graphics.GraphicsDevice.Viewport.Width) Then
            MagicSongEnd.Play()
            'Тут должно быть то самое подобие Dispose()
        End If
End Sub

Public Sub Update()
        If Me.MagicPosition.X + 32 > (Globals.graphics.GraphicsDevice.Viewport.Width) Then
            Finalize()
        End If
End Sub
 
Protected Overrides Sub Finalize()
        Try
            For Each I As MagicBolt In ParentSprites.FireBalls
                If I.Equals(Me) = True Then
                    Me.MagicSongEnd.Play()
                    Me.ParentSprites.FireBalls.Remove(I)
                    Exit For
                End If
            Next
        Catch ex As Exception
        End Try
        MyBase.Finalize()
    End Sub