VB6 en DLL

[Bridger]

Please Help! Wie kan mij helpen met het aanroepen van een DLL in VB6.

Hieronder een declaratie.

Dit staat in een BAS module

Option Explicit

Public Declare Sub SetupCalc Lib "WIP2000.DLL" (ByVal lHandle As Long, ByVal lEvening As Long, ByVal lNrPairs As Long, ByVal lNrTables As Long, ByVal lNrIretations As Long, ByVal tPrevNrPairs As String)

In de General van de form
Option Explicit

Private Sub Command1_Click()

Dim lHandle As Long
Dim lEvening As Long
Dim lNrPairs As Long
Dim lNrTables As Long
Dim lNrIretations As Long
Dim tPrevNrPairs As String * 340

lEvening = 1
lNrPairs = 12
lNrTables = 6
lNrIretations = 100
tPrevNrPairs = "0"

Call SetupCalc(lHandle, lEvening, lNrPairs, lNrTables, lNrIretations, tPrevNrPairs)

End Sub

De WIP2000.DLL staat in App.Path

Alvast bedankt voor de te nemen moeite.