Scrivere E Leggere Txt - TXT con VB6

[Comin]

Altra domandina! come posso scrivere e leggere parole su un file TXT .Quali sono le cose che devo tener conto???? (Con Visual Basic 6)

Modificato: 10 dicembre 2003 da Comin

[TRUNC]

Un breve tratto di codice per cercare la parola "pippo" all'interno di un file di testo:

Sub Operazione_su_txt()

Dim s1 As String

Open "c:\file_di_testo.txt" For Input As #1

Do While Not EOF(1)

Line Input #1, s1

If InStr(1, s1, "pippo") Then MsgBox ("Pippo c'è!"): Close #1: Exit Sub

Loop

MsgBox ("Pippo non c'è!")

Close #1

End Sub

Ciao!

[Comin]

E per scrivere ??

Modificato: 10 dicembre 2003 da Comin

[JumpMan]

Open "c:\file_di_testo.txt" For Input As #1
Print #1, "PER"
Print #1, "IMPARARE"
Print #1, "IL VB"
Print #1, "BISOGNA"
Print #1, "LEGGERE"
Print #1, "UN QUINTALE"
Print #1, "DI LIBRI !"
Close #1

Scusami ma non ho resistito

[Comin]

Open "c:\file_di_testo.txt" For Input As #1

Print #1, "OPPURE"

Print #1, "ISCRIVERSI "

Print #1, "AD UN"

Print #1, "FORUM"

Print #1, "E"

Print #1, "RINGRAZZIARE"

Print #1, "GLI AMICI"

Close #1

[JumpMan]

Bene! vedo che cominci a imparare.

Visto che ti piace i VB ti metto un paio di link interessanti:

http://www.visual-basic.it/

(qui puoi scaricare un database pieno di Sub & Function già funzionanti)

http://www.vbitalia.it/

Ciao

[Comin]

Grazie ma gia visitati

ti metto un link interessante

http://www.it-lang-vb.net/

[ifachsoftware]

Guardati anche questo http://www.freevbcode.com

Ciao

Modificato: 12 dicembre 2003 da ifachsoftware