Probléme passage vb6 vers vb Net

Bonjour,

J'ai une Dll codé en vb6 et un projet exemple en vb6 pour s'en servir. Je veut m'en servier en vb net. J'ai porté le projet vb6 vers vb net mais cela ne fonctionne pas. Le prbléme est avec une fonction qui fait un callback.

Code VB6
Déclaration du prototype de la fonction de la dll

Code:

---

1 2	Public Declare Function SetProgressProc Lib "ISMBUS32.DLL" Alias "_SCDLG_SetProgressProc" (ByVal Pnt As Long) As Long

---

Appel de la fonction

Code:

---

1 2	Call SetProgressProc(AddressOf CallbackProc_Progress)

---

Fonction callback

Code:

---

1 2 3 4

Sub CallbackProc_Progress(ByVal Data As Double) MainScreen.Progress.Caption = CStr(CInt(Data)) + " %" End Sub

---

Code En VB Dot Net
Déclaration du prototype de la fonction de la dll

Code:

---

1 2 3

Public Delegate Sub SetProgressProcDelegate(ByVal Pnt As Double) Public Declare Function SetProgressProc Lib "ISMBUS32.DLL" Alias "_SCDLG_SetProgressProc" (ByVal Pnt As SetProgressProcDelegate) As Integer

---

Appel de la fonction

Code:

---

1 2	Call SetProgressProc(AddressOf CallbackProc_Progress)

---

Fonction callback

Code:

---

1 2 3 4

Sub CallbackProc_Progress(ByVal Data As Double) MainScreen.DefInstance.Progress.Text = CStr(CShort(Data)) & " %" End Sub

---

Merci d'avance pour vos réponce

Personne pour me répondre? Mon message n'est pas assé claire?

que fait ta dll ?
ne serait il pas possible de la réécrire avec le framework (sinon c'est pas utile de venir sur .NET)

sinon oriente peut etre tes recherches sur les délégués (delegate)
et peut etre la gestion des threads aussi ...

Je ne peut pas la reécrire car ces une dll de communication avec un appareil externe fornit par le fabricant. Pour les delegate c'est ce que j'ai essayé de faire mais sabs succés!