Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Suche mehrere Codes
Autor: bestdani
Datum: 13.01.06 18:04
nun ja ^^ ich bin eigentlich nicht gerade sehr gut in VB. Kann zwar bisschen mit den Standart Controls umgehen usw. soll heiße: ich verstehe nur Bahnhof^^ also was ich genau brauche: Ich will aus einer Variablen, eine bestimmte Zeichenkette finden und die angabe der Zeilenposition, in der die zeichenkette ist. In etwa so: Public Function txt_ReadAll(ByVal sFilename As String) As String Dim F As Integer Dim sInhalt As String ' Existiert die Datei ? If Dir$(sFilename, vbNormal) <> "" Then ' Textdatei im Binärmodus öffnen und gesamten ' Inhalt in einem Rutsch auslesen F = FreeFile Open sFilename For Binary As #F sInhalt = Space$(LOF(F)) Get #F, , sInhalt Close #F End If txt_ReadAll = sInhalt End Function Private Sub cmdSub_Click() Dim Text As String Dim Zeile As Integer Text = txt-ReadAll ("Dateipfad und Name") Zeile = 'FindeZeichenZeile' ("Zeichenkette", Text) txt_WriteLine ("Dateipfad und Name", Zeile, zu_schreibender_Text) End Sub jetzt benötige ich nur eine Funktion um die Zeilenposition einer bestimmten zeichenkette zu bekommen. Kann mir jemand so eine Fuktion schicken?? thx4help!

Suche mehrere Codes	1.141	bestdani	12.01.06 22:04
Re: Suche mehrere Codes	794	OldMan	12.01.06 23:52
Re: Suche mehrere Codes	761	bestdani	13.01.06 18:04

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