Discussion :

[lio33]

Bonjour,

Je souhaite appeler une fonction d'une DLL écrite en VC++ qui prend en pramètre d'entrée un tableau d'entiers long.

Le prototype de la fonction C est le suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

int __stdcall initChecksumTable(unsigned long *crc_table)

Dans mon appli VB j'ai déclaré les éléments suivants :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Public crc_table(256) As Long
Declare Function initChecksumTable Lib "C:\temp\My.dll" (crc_table As Long) As Long

Mon appel à cette fonction :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

retour = initChecksumTable(crc_table)

VB ne veut pas compiler cette ligne et m'informe que l'utilisation de ByRef est incompatible ! J'ai essayé en spécifiant ByRef dans la déclaration VB mais cela ne change rien.

Pouvez vous m'aider sur ce point ?

Merci d'avance.

[Phifi]

Bonjour,

si tu ne spécifie rien, un argument est passé par référence par défaut (ByRef) dans une fonction (c'est pas terrible), tu peux essayer d'utilser ByVal devant la déclaration de ton argument, mais sans certitude aucune

[Vld44]

est-ce que des éléments du tableau passé sont négatifs ?

[lio33]

En fait en utilisant des fonctions C cela fonctionne beaucoup.
J'ai donc changé ma fonction C et utilisé une "Function" VB.

De plus pour éviter de me faire jeter, j'ai du initialiser mon tableau et corriger une erreur dans l'appel de la fonction de la DLL pour passer le tableau. En fait il faut passer le premier élément :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

retour = initChecksumTable( crc_table(0) )

Donc cela marchote !!