vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Erstellen von dynamischen Kontextmen?s - wann immer Sie sie brauchen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Text einlesen 2 
Autor: Atlan
Datum: 12.01.02 00:43

Ich versuch es nochmal da ich immer noch nicht weiter gekommen bin.
'******************************************************************
Also speichern wie folgt:
Private Sub cmdSpeichern_Click()
Open "Adressen.txt" For Append As #1
Print #1, txt0.Text, txt1.Text, txt2.Text, txt3.Text, txt4.Text, txt5.Text, txt6.Text, txt7.Text, txt8.Text, txt9.Text, txt10.Text, txt11.Text, txt12.Text, txt13.Text
Close #1
End Sub
'******************************************************************
Laden in List1:
Private Sub Form_Load()
On Error GoTo Error
Dim Text, Pfad
Pfad = "Adressen.txt"
Open Pfad For Input As #1
While Not EOF(1)
Line Input #1, Text
If InStr(1, Text, "") Then List1.AddItem Text
Wend
Close #1
End Sub
'******************************************************************
Dies sind die Textfelder:
Sub Neu()
Form1.txt0.SetFocus
Form1.txt0.Text = "Nachname:"
Form1.txt1.Text = "Vorname:"
Form1.txt2.Text = "Adresse:"
Form1.txt3.Text = "Plz:"
Form1.txt4.Text = "Land:"
Form1.txt5.Text = "Wohnort:"
Form1.txt6.Text = "Telefon Privat:"
Form1.txt7.Text = "Telefon. Firma:"
Form1.txt8.Text = "Telefon. Handy:"
Form1.txt9.Text = "Faxnummer:"
Form1.txt10.Text = "M@iladresse:"
Form1.txt11.Text = "http://www."
Form1.txt12.Text = "Sonstiges:"
Form1.txt13.Text = "Bemerkungen:"
End Sub
'**************************************************************
Was mir dabei fehlt ist, das die Einträge die zuvor in der
Adressen.txt gespeichert wurden, und sich beim laden dann
auch in dem List1.List Feld befinden, dann sollen alle
gemachten Einträge wenn ich nach dem Namen suche, in dem
txtSuchen.Text in die dafür vorgesehenen Text-Felder
geschrieben werden.
gruß
Atlan
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Text einlesen 294Atlan12.01.02 00:43
Na, da wollen wir Dich vor einem schweren Designfehler schüt...239unbekannt12.01.02 12:35
Teil 1: Done.245unbekannt12.01.02 16:05
Re: Teil 2: Done.235unbekannt12.01.02 16:35
Re: Teil 3: Done.252unbekannt12.01.02 16:45
Re: Teil 4: Done.216unbekannt12.01.02 17:28
Das war's mal, aber:224unbekannt12.01.02 17:36
Re: Das war's mal, aber:38Atlan12.01.02 21:27
Wieso, das ist doch keine Datenbank? Naja, ich fasse es mal ...261unbekannt12.01.02 21:35
Re: Wieso, das ist doch keine Datenbank? Naja, ich fasse es ...72Atlan13.01.02 00:10
Re: Wieso, das ist doch keine Datenbank? Naja, ich fasse es ...239unbekannt13.01.02 00:23
Re: Wieso, das ist doch keine Datenbank? Naja, ich fasse es ...68Atlan13.01.02 01:46
Re: Wieso, das ist doch keine Datenbank? Naja, ich fasse es ...214unbekannt13.01.02 01:48
Komplett und funkt 345unbekannt13.01.02 15:03
Re: Komplett und funkt 48Atlan13.01.02 16:07
Na, löschen wir mal ...433unbekannt13.01.02 18:11
Re: Na, löschen wir mal ...43Atlan13.01.02 18:36
Re: Na, löschen wir mal ...285unbekannt13.01.02 19:11
Re: Na, löschen wir mal ...39Atlan13.01.02 20:09
Re: Na, löschen wir mal ...241unbekannt13.01.02 20:15
Re: Na, löschen wir mal ...59Atlan13.01.02 21:10
Re: Na, löschen wir mal ...253unbekannt14.01.02 00:22
Re: Na, löschen wir mal ...45Atlan14.01.02 23:37
Re: Na, löschen wir mal ...36Atlan16.01.02 09:56
Re: Na, löschen wir mal ...44Atlan16.01.02 19:59
Hi ... Hi ....439unbekannt16.01.02 20:06
Re: Hi ... Hi ....46Atlan16.01.02 21:50
So isses ... fast ... Good work! (oT)240unbekannt16.01.02 21:55
Naja, wenn einige bei Snake so mitgedacht hätten ... uiii361unbekannt16.01.02 22:11
Re: Naja, wenn einige bei Snake so mitgedacht hätten ... uii...44Atlan17.01.02 10:56
Hi Lordchen37Atlan20.01.02 11:29

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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel