Передача AddressOf функции в VB.NET для использования AddHandler

Question

Мне нужно передать ссылку функции на другую функцию в VB.NET. Как это может быть сделано?

Моя функция должна использовать AddHandler внутри, для чего мне нужно передать ей функцию обработки. Мой код ниже явно не работает, но он передает идею того, что мне нужно.

Public Function CreateMenuItem(ByVal Name As String, ByRef Func As AddressOf) As MenuItem 
    Dim item As New MenuItem 

    item.Name = Name 
    'item. other options 

    AddHandler item.Click, AddressOf Func 

    Return item 
End Function 

Есть ли другой способ сделать это? AddHandler должен быть установлен в переданный параметр в функции каким-то образом ...

Answer 1

Во-первых, обработчики событий должны иметь Subs. Во-вторых, AddressOf не может использоваться как тип. Если юг находится в том же классе, просто используйте его. Если это в другом классе/файле, вам может понадобиться сделать суб-публикацию и/или квалифицировать ее как члена другого класса. Переводники для пункта AddHandler должны в основном по той же схеме:

Public/Private Sub MyHandler(sender As Object, e As EventArgs) 

Если вам нужны различные процедуры на основе имени пункта меню, вы можете использовать один обработчик и вызвать соответствующую процедуру на основе названия элемента запускающего событие.

Answer 2

Ваш второй аргумент в функции должны быть типа EventHandler, и ваша функция будет выглядеть так:

Public Function CreateMenuItem(ByVal Name As String, ByRef Func As EventHandler) As MenuItem 
    Dim item As New MenuItem 

    item.Name = Name 
    'item. Other options 

    AddHandler item.Click, Func 

    Return item 
End Function 

Теперь вам нужен метод для обработки этих кликов:

Private Sub ItemClick(sender As Object, e As EventArgs) 
    'Do something with that click here 
End Sub 

И вы могут использовать эти два метода сейчас с чем-то вроде:

Dim handler = New EventHandler(AddressOf ItemClick) 
    Dim i = CreateMenuItem("My item", handler) 

    i.PerformClick() 

Answer 3

Веселый делегат - это то, что вам нужно сделать. Сначала вам нужно определить делегата где-нибудь в классе. Измените подпись, чтобы она соответствовала вашему курсу.

Public Delegate Sub MyDelegate(sender As System.Object, e As System.EventArgs) 

Ваша функция примет делегата в качестве аргумента.

Public Function CreateMenuItem(ByVal Name As String, del As MyDelegate) As MenuItem 
    '''' 
    AddHandler item.Click, del 
    '''' 
End Function 

Public Sub MyEventHandler(sender As System.Object, e As System.EventArgs) 
    '''' 
End Sub 

А вот как вы вызываете функцию:

CreateMenuItem(myString, AddressOf MyEventHandler)