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

Fortgeschrittene Programmierung
Re: Frage an Dieter 
Autor: ModeratorDieter (Moderator)
Datum: 23.10.01 12:20

Hi ChrisN,

nun gut, im ersten Beitrag hattest Du vom Editor gesprochen - da bin ich vom Windows-Editor ausgegangen.

Wenn Du aber eine Textdatei in ein Textfeld laden willst, dann sieht die Sache ein wenig anders aus.

Die API-Deklaration brauchst Du dann natürlich nicht.

Hier der Code für das File1_DblClick - Ereignis:
 
Sub File1_DblClick()
Dim sFilename As Strng
Dim F As Integer
Dim sInhalt As String

If File1.ListIndex >= 0 Then
sFilename = File1.Path
If Right$(sFilename, 1) <> "\" Then sFilename = sFilename & "\"
sFilename = sFilename & File1.List(File1.ListIndex)

' Datei einlesen und in Textbox anzeigen
F = FreeFile
Open sFilename For Binary As #F
sInhalt = Space$(Lof(F))
Get #F, , sInhalt
Close #F

txtMultiLine.Text = sInhalt
End If
End Sub
 
Du hierfür nicht. Du musst lediglich den Namen der TextBox anpassen (im Beispiel habe ich sie txtMultiLine genannt).

Cu
Dieter
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Datei aus einer FileListBox öffnen???76ChrisN23.10.01 11:16
Re: Datei aus einer FileListBox öffnen???615ModeratorDieter23.10.01 11:30
Frage an Dieter54ChrisN23.10.01 12:12
Re: Frage an Dieter387ModeratorDieter23.10.01 12:20
Danke Dieter,aber..55ChrisN23.10.01 12:43
Was meinst Du mit...357ModeratorDieter23.10.01 12:49
Re: Was meinst du mit...53ChrisN23.10.01 13:58
Ah... Ordner-Auswahl-Dialog394ModeratorDieter23.10.01 15:08

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