События COM от C # до VB6 («объект или класс не поддерживает набор событий»), но разные

Надеюсь, это может помочь - вот минимальная реализация ваших требований на VB.net: COM-интерфейс, потребляемый VB6, одно событие, один метод.

Option Explicit On
Option Strict On

<ComClass(newTricks.ClassId, newTricks.InterfaceId, newTricks.EventsId)>
Public Class newTricks

#Region "COM GUIDs"
    ' These  GUIDs provide the COM identity for this class 
    ' and its COM interfaces. If you change them, existing 
    ' clients will no longer be able to access the class.
    Public Const ClassId As String = "386d540d-f8b8-46e1-939d-7b69dd5eff0a"
    Public Const InterfaceId As String = "78b4036e-86a0-4671-997d-da5a33bf026f"
    Public Const EventsId As String = "7b0fa5b5-b45e-4db2-9282-c06e09852161"
#End Region

    ' A creatable COM class must have a Public Sub New() 
    ' with no parameters, otherwise, the class will not be 
    ' registered in the COM registry and cannot be created 
    ' via CreateObject.
    Public Sub New()
        MyBase.New()
    End Sub

    Public Event NotificationEvent()

    Public Sub SendAnEvent()
        RaiseEvent NotificationEvent()
    End Sub
End Class

Это было создано путем запуска нового проекта (библиотеки классов Windows), удаления из проекта автоматически созданного Class1.vb, добавления элемента COM-класса, переименованного в NewTricks. Затем добавили объявление события, суб-объявление и код; также добавлены операторы Option. Построил проект.

Это было успешно использовано из этого кода VB6. Нажатие на кнопку привело к появлению сообщения «Событие запущено» в непосредственном окне. Это было успешным с использованием как New, так и CreateObject методов создания ссылки на newTricks.

Option Explicit

Private WithEvents oTricks As NewTricksDll.newTricks

Private Sub Command1_Click()

  Set oTricks = New NewTricksDll.newTricks
  'Set oTricks = CreateObject("NewTricksDll.newTricks")

  oTricks.SendAnEvent

End Sub

Private Sub oTricks_NotificationEvent()
  Debug.Print "Event fired"
End Sub

Вот соответствующий код C # для кода VB.net, преобразованный напрямую с помощью https://converter.telerik.com/

using Microsoft.VisualBasic;

[ComClass(newTricks.ClassId, newTricks.InterfaceId, newTricks.EventsId)]
public class newTricks
{

    // These  GUIDs provide the COM identity for this class 
    // and its COM interfaces. If you change them, existing 
    // clients will no longer be able to access the class.
    public const string ClassId = "386d540d-f8b8-46e1-939d-7b69dd5eff0a";
    public const string InterfaceId = "78b4036e-86a0-4671-997d-da5a33bf026f";
    public const string EventsId = "7b0fa5b5-b45e-4db2-9282-c06e09852161";

    // A creatable COM class must have a Public Sub New() 
    // with no parameters, otherwise, the class will not be 
    // registered in the COM registry and cannot be created 
    // via CreateObject.
    public newTricks() : base()
    {
    }

    public event NotificationEventEventHandler NotificationEvent;

    public delegate void NotificationEventEventHandler();

    public void SendAnEvent()
    {
        NotificationEvent?.Invoke();
    }
}

Я не пробовал этот код C #.

Если вы используете CreateObject, он создает объект типа Object, который я считаю. Вы должны создать объект, просто используя New:

Set _tricky = New NewTricksDLL.NewTricks

Поскольку вы объявили переменную как WithEvents, вы не можете просто объявить ее с помощью As New NewTricksDLL.NewTricks, который, как я полагаю, вы, вероятно, пробовали.