Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Als Text Datei speichern
Autor: TBNexus
Datum: 24.09.02 10:37
Private Sub cmd_OK_Click() Dim I Dim F As Integer For I = 0 To 5 If chb_1(I).Value = 1 Then pub_Chb(I) = True Else pub_Chb(I) = False End If If Trim(txt_Waerung(I).Text) = "" And txt_Waerung(I).Locked = False Then MsgBox "Sie müssen noch eine Wärung eintragen" txt_Waerung(I).SetFocus Exit Sub Else pub_Bezeichnung(I) = txt_Bezeichnung(I).Text pub_Waerung(I) = txt_Waerung(I).Text End If F = FreeFile Open "C:Test.txt" For Output As #F Print #F, pub_Bezeichnung(I) Close #F Next I Unload Me End Sub

Als Text Datei speichern	87	TBNexus	24.09.02 09:48
Re: Als Text Datei speichern	265	Dieter	24.09.02 10:06
Re: Als Text Datei speichern	47	TBNexus	24.09.02 10:23
Re: Als Text Datei speichern	256	Dieter	24.09.02 10:32
Re: Als Text Datei speichern	44	TBNexus	24.09.02 10:37
Re: Als Text Datei speichern	254	Dieter	24.09.02 11:01
Re: Als Text Datei speichern	47	TBNexus	24.09.02 11:37
Wie sieht der Code aus? (oT)	278	Dieter	24.09.02 12:45
Re: Wie sieht der Code aus? (oT)	39	TBNexus	24.09.02 13:35

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