'Sub New' não pode tratar eventos

Você tentou combinar Sub New com Handles, o que é inválido. Use a palavra-chave Handles no final de uma declaração de procedimento para fazer com que ela lide com eventos gerados por uma variável de objeto declarada usando a palavra-chave WithEvents.

ID do erro: BC30497

Para corrigir este erro

1. Não use New neste contexto.

Confira também

• Alças
• Instrução Dim
• WithEvents