problema con EnumWindows

[s_azazel]

Estoy intentando numerar las ventanas que tengo activas...

Este es el codigo que tengo:

Código (vbnet) [Seleccionar] Expandir

Option Explicit On
Public Class Form1
   
    Public Declare Function EnumWindows Lib "user32" _
    (ByVal lpEnumFunc As Long, _
     ByVal lParam As Long) As Long


   
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Call EnumWindows(AddressOf EnumWindowProc, &H0)

    End Sub

  Public Function EnumWindowProc(ByVal hwnd As Long, ByVal lParam As Long) As Long

EnumWindowProc=1


End function

End Class

Pero la linea de la llamada a EnumWindows me da este error

"Una expresión 'AddressOf' no se puede convertir en 'Long' debido a que 'Long' no es un tipo delegado"


Sabeis a que se puede deber???
Muchas gracias me estoy volviendo loco

[raul338]

Eso es porque estas usando visual basic .net, e intentas aplicar codigo que corresponde a visual basic 6.

O usas visual basic 6, o usas la API con delegados y de forma administrada

pInvoke - EnunWindows en .net