MathiasRichter
Grünschnabel
Hallo
ich habe ein paar klassen in meiner dll
dcIDKey
= Key As String
dcPic
=ID_Key As dcKey
=CaptionX As String
ich habe dann diese methode in der dcPic geschrieben
sie funktioniert anstandslos
dann schrieb ich das gegenstück (laden)
aber das funktioniert nicht, weil VB meint:
"variable erforderlich - zuweisung an diesen ausdruck nicht möglich" und es markiert .key bei dummy.id_key
Wer kann mir da helfen?
wenn ich es umständlich und kaum mehr leserlich schreibe(bei vielen datensätzen) dann sieht das so aus, und es funktioniert.
bitte brauche dringed hilfe!
matze
ich habe ein paar klassen in meiner dll
dcIDKey
= Key As String
dcPic
=ID_Key As dcKey
=CaptionX As String
ich habe dann diese methode in der dcPic geschrieben
Code:
Public Sub Save()
Dim dummy As New dcPic
Set Dummy.Id_Key = New dcIDKey
Dummy.CaptionX="This is a Test"
Dummy.ID_Key.Key="Should work"
Open "C:\Test.txt" For OutPut As #1
Write #1 , Dummy.CaptionX, Dummy.ID_Key.Key
Close #1
End Sub
sie funktioniert anstandslos
dann schrieb ich das gegenstück (laden)
Code:
Public Sub Load()
Dim dummy As New dcPic
Set Dummy.Id_Key = New dcIDKey
Dummy.CaptionX="empty"
Dummy.ID_Key.Key="empty too"
Open "C:\Test.txt" For InPut As #1
Input #1 , Dummy.CaptionX, Dummy.ID_Key.Key
Close #1
End Sub
aber das funktioniert nicht, weil VB meint:
"variable erforderlich - zuweisung an diesen ausdruck nicht möglich" und es markiert .key bei dummy.id_key
Wer kann mir da helfen?
wenn ich es umständlich und kaum mehr leserlich schreibe(bei vielen datensätzen) dann sieht das so aus, und es funktioniert.
Code:
Public Sub Load()
Dim dummy As New dcPic
Set Dummy.Id_Key = New dcIDKey
Dim s1,s2 as string
Dummy.CaptionX="empty"
Dummy.ID_Key.Key="empty too"
Open "C:\Test.txt" For InPut As #1
Input #1 , s1,s2
Dummy.CaptionX=s1
Dummy.ID_Key.Key=s2
Close #1
End Sub
bitte brauche dringed hilfe!
matze