Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Random-Dateien und mehrdimensionale Arrays
Autor: hwb
Datum: 03.12.09 16:53
hier mal mein Testprogramm: wer sieht den Fehler ? so funktioniert es nicht ! Option Explicit ‘Modul Type Datensatz Baunamen(1 To 10, 1 To 10) As Variant End Type Public Bau As Datensatz Public Zeichen As Integer Public Zahl As Integer ---------------------------------------------- Private Sub Bauspeich_Click() If Text2.Text = "" Then Exit Sub For c = 1 To 10 ‘suche den nächsten freien Arrayplatz If Bau.Baunamen(Zeichen, c) = "" Then Exit For Next Zahl = c If Zahl = 0 Then Zahl = 1 Bau.Baunamen(Zeichen, Zahl) = Text2 ’Zeichen steht für eine Integer Variable die ich aus einer Listbox ausgewählt habe Open "BauTest.dat" For Random As #2 Len = Len(Bau) Put #2, Zeichen, Bau Close #2 List2.Clear For a = 1 To 10 zeigt alle Werte des 2.Arrays (Zahl) an List2.AddItem Bau.Baunamen(Zeichen, a) Next End Sub ---------------------------------------------------------------------- Private Sub Form_Load() Einlesen der Datei Open "BauTest.dat" For Random As #2 Len = Len(Bau) For a = 1 To 10 Get #2, a, Bau Next Close #2 List2.Clear For b = 1 To 10 List2.AddItem Bau.Baunamen(Zeichen, b) Next End Sub

Random-Dateien und mehrdimensionale Arrays	3.063	hwb	01.12.09 17:52
Re: Random-Dateien und mehrdimensionale Arrays	2.489	Danzi	02.12.09 14:25
Re: Random-Dateien und mehrdimensionale Arrays	2.436	hwb	03.12.09 12:10
Re: Random-Dateien und mehrdimensionale Arrays	2.424	Danzi	03.12.09 12:59
Re: Random-Dateien und mehrdimensionale Arrays	2.441	hwb	03.12.09 13:52
Re: Random-Dateien und mehrdimensionale Arrays	2.550	Danzi	03.12.09 16:33
Re: Random-Dateien und mehrdimensionale Arrays	2.406	hwb	03.12.09 18:50
Re: Random-Dateien und mehrdimensionale Arrays	2.413	hwb	03.12.09 16:53
Re: Random-Dateien und mehrdimensionale Arrays	2.560	Danzi	04.12.09 11:10
Re: Random-Dateien und mehrdimensionale Arrays	2.387	hwb	04.12.09 15:04
Re: Random-Dateien und mehrdimensionale Arrays	2.466	Danzi	04.12.09 15:59
Re: Random-Dateien und mehrdimensionale Arrays	2.430	hwb	05.12.09 10:38
Re: Random-Dateien und mehrdimensionale Arrays	2.375	wb-soft	05.12.09 13:10

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen