Interrop VB6 vers C#

Bonjour je cherche un peu d'aide d'un spécialiste VB pour traduire un code VB6 faisant appel a une DLL C++ vers du code Csharp

Voici un petit extrait du code VB

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

Attribute VB_Name = "PCS7LW32"   Global Const S7_E_NOERR = 0 '/* alles OK */ Global Const S7_E_TIMEOUT = -1 '/* Zeitberlauf */   Type S7 Com As Integer bInit As Byte   DummyB1 As Byte   DummyB2 As Integer Err As Integer Internal(1 To 1600) As Byte End Type     Declare Function S7Init& Lib "PCS7LW32.dll" (pS7 As S7, ByVal Com%, ByVal SPSMPIAdr%, ByVal LocalMPIAdr%, ByVal Baud%)

---

Voici ce que je pense faire en Csharp

1- Tout mettre dans une classe statique
2- Je suppose que la declaration : VB Attribute VB_Name = "PCS7LW32"
est l'equivallent d'un DllImport que je ferais en C#
Et que donc

Code:

---

Declare Function S7Init& Lib "PCS7LW32.dll" (pS7 As S7, ByVal Com%, ByVal SPSMPIAdr%, ByVal LocalMPIAdr%, ByVal Baud%)

---

Se traduirait

Code:

---

1 2	[DllImport("PCS7LW32.dll")] static public unsafe extern int S7Init(S7, etc..);

---

Global je suppose que c'est Public
Et un Type serait dans ce cas une Struct ou une Class

Merci de votre aide

ByVal ce serait un passage simple de parametre ?

Bonjour,

Citation:

---

Envoyé par olibara

2- Je suppose que la declaration : VB Attribute VB_Name = "PCS7LW32"

---

C'est le nom du module VB.
Normalement dans l'éditeur vb6 on ne voit pas cette ligne
Tu as du ouvrir avec un éditeur de texte autre que l'EDI de VB6.

Après dans le code on peut aussi appeler la fonction de cette façon
PCS7LW32.S7Init&((S7, etc..)
mais ce n'est pas obligé.


Dans vb6 le code ci-dessous

Citation:

---

Envoyé par olibara

Code:

---

Declare Function S7Init& Lib "PCS7LW32.dll" (pS7 As S7, ByVal Com%, ByVal SPSMPIAdr%, ByVal LocalMPIAdr%, ByVal Baud%)

---

---

c'est effectivement la déclaration d'une fonction présente dans une DLL externe.

Citation:

---

Envoyé par olibara

Global je suppose que c'est Public

---

C'est la déclaration dans les anciennes version de VB, depuis VB5 et VB6 cela est remplacé par Public.

Citation:

---

Envoyé par olibara

Et un Type serait dans ce cas une Struct ou une Class

---

Correspond a une structure

Citation:

---

Envoyé par olibara

ByVal ce serait un passage simple de parametre ?

---

correspond au passage de paramètre par défaut dans C#.
ByRef correspond à ref.

Sinon, pose la question sur le forum vb6, des personnes plus expérimentées pourrons t'apporter des réponses plus précises ou des compléments d'informations.
A+, Hervé.

Merci Hervé !
Ok je vais demander encore quelques précision sur le forum vb6
Entre autre comment spécifier le repertoire ou le module va chercher la DLL

Car actuellement pour tester en VB6 je suis obligé de specifier le chemin complet pour chaque declaration