Hallo zusammen!
Habe folgendes Problem:
Ich würde gerne zwischen meinem Hauptprogramm (EXE) und meiner selbgeschriebenen
DLL Daten austauschen.
Habe darum folgende Klasse geschrieben (die in der DLL inkludiert ist):
Setze ich nun im Hauptprogramm den Wert Groesse, so ist der Wert
in der DLL wieder verschwunden (ist gleich 0).
und nun die DLL:
Ich hoffe es kann mir wer helfen.
Vielen Dank im voraus.
LG,
Hans
Habe folgendes Problem:
Ich würde gerne zwischen meinem Hauptprogramm (EXE) und meiner selbgeschriebenen
DLL Daten austauschen.
Habe darum folgende Klasse geschrieben (die in der DLL inkludiert ist):
Code:
' ##### Klasse Test #####
Option Explicit
Private Elemente As Integer
Public Function SetzeStandard()
Groesse = 815
End Function
Public Property Get Groesse() As Variant
Groesse = Elemente
End Property
Public Property Let Groesse(ByVal Wert As Variant)
Elemente = Wert
End Property
Public Property Set Groesse(Wert As Variant)
Elemente = Wert
End Property
'#### Ende Klasse Test ####
Setze ich nun im Hauptprogramm den Wert Groesse, so ist der Wert
in der DLL wieder verschwunden (ist gleich 0).
Code:
'###### MAIN (Exe) #######
Dim Test_Interface As New Test
Test_Interface.Groesse = 345
'###### Ende MAIN (Exe) #######
und nun die DLL:
Code:
Private Sub Form_Load()
Dim SkEd As New Test
Label1.Caption = SkEd.Groesse
End Sub
Ich hoffe es kann mir wer helfen.
Vielen Dank im voraus.
LG,
Hans
Zuletzt bearbeitet: