[VB.NET] Cancellare oggetti Shape da codice

[erot79]

Salve, ho un problema forse banale ma non riesco a risolvere. Creo runtime degli oggetti lineshape e ovalshape inseriti nello shapecontainer di nome canvas. Voglio creare poi una routine che cancella tutti gli shape contenuti nel mio form. Ho provato così

Dim l As LineShape
Dim o As OvalShape
        For Each l In canvas.Shapes
            For Each o In canvas.Shapes
                canvas.Shapes.Remove(o)
            Next
            canvas.Shapes.Remove(l)
        Next
        l.Dispose()
        o.Dispose()

ma ottengo il seguente messaggio:
Unable to cast object of type 'Microsoft.VisualBasic.PowerPacks.OvalShape' to type 'Microsoft.VisualBasic.PowerPacks.LineShape'.

dove sbaglio? Grazie