Поставщик OraDirect DevArt теперь поддерживает платформу объекта. См. http://devart.com/news/2008/directs475.html
Вам просто нужно передать имя процедуры обработчика событий после AddressOf
Private Sub HookupEvents()
AddHandler AboutMenuItem.Click, AddressOf ShowAboutDialog
End Sub
Public Sub ShowAboutDialog(ByVal sender As Object, ByVal e As System.EventArgs)
End Sub