vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Schützen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!  
 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
Code in Prozedur 
Autor: NiGhTmArE
Datum: 16.01.02 20:17

wie bekomme ich den nachfolgenden code in eine prozedur das den code nur noch mit openfile(parameter) eingeben muss???

Private Sub öffnen_Click()
' um textdateien zu öffnen

'Variable Definieren
Dim lineoftext$
Dim ausgabe$

'Datei Auswählen mit CommonDialogFenster
dialog.Filter = "Textdateien (*.txt)|*.txt"
dialog.ShowOpen
file = dialog.FileName

'TXT File einlesen
Open file For Input As #1

'Schleife zum Auslesen der zeilen in der Datei
Do Until EOF(1)
Line Input #1, lineoftext
ausgabe = ausgabe & lineoftext & vbCrLf
Loop
Close #1

'Ausgeben ins Textfeld
textfeld = ausgabe

End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Code in Prozedur67NiGhTmArE16.01.02 20:17
Re: Code in Prozedur197ModeratorDieter16.01.02 20:30
Re: Code in Prozedur35NiGhTmArE16.01.02 20:42
Re: Code in Prozedur180ModeratorDieter16.01.02 20:52
Re: Code in Prozedur35NiGhTmArE16.01.02 20:52
Re: Code in Prozedur186ModeratorDieter16.01.02 20:53
Re: Code in Prozedur33NiGhTmArE16.01.02 21:08
Re: Code in Prozedur185ModeratorDieter16.01.02 22:01
Re: Code in Prozedur32NiGhTmArE16.01.02 22:12
Re: Code in Prozedur186ModeratorDieter16.01.02 22:31
Re: Code in Prozedur32NiGhTmArE16.01.02 22:38
Re: Code in Prozedur193ModeratorDieter16.01.02 23:40

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