#include "Windows.h"
 
int _stdcall Addition(int Zahl1, int Zahl2);  // Prototyp
 
int _stdcall Addition(int Zahl1, int Zahl2) // Funktion
{
    return Zahl1*Zahl2;
}

LIBRARY dllname 
EXPORTS
Addition

Option Explicit
Private Declare Function Addition Lib "dllname.dll" (ByVal Zahl1 as Long, ByVal _
  Zahl2 as Long) as Long
 
Private Sub Form_Load()
    Dim RetVal as integer
    RetVal = Multiply(5,6)
    MsgBox RetVal
End Sub