Visual Basic 6 - Text1, List1Box

ciao a tutti, se ho un List1 e un Text1

dove, nel Text1 scrivo "ciao"

aggiungo quello che ho scritto nel List1

List1.AddItem "ciao"

se voglio memorizzare la scritta "ciao" in un File di testo, so come, affinché si memorizzi.

Ma se io voglio cancellare il "ciao" dal file di testo o voglio cancellare, solo "o" e far rimanare "cia" ? Come faccio?

Devi scrivere questa "formula":
List1.RemoveItem (ciao)

mi spiego meglio.

sto creando un progettino, avente un text, un combo e un list

quando nel text, vado a scrivere qualsiasi termine, lui lo memorizza nel "file.txt" che si trova nella cartella della mia applicazione

se io, ho appena salvato, "ciao", "come stai", "da dove vieni"

sempre aggiungendo

List1.AddItem text1 ' che é quello che io scrivo, ogni volta

come faccio a cancellare il "ciao", "come stai" e altro?

e inoltre, se voglio cancellare, solo una parola di un testo?

"ciao", solo "o" ?

ok?

vediamo se ho capito bene io...

Dim cartella As String, documento As String, FileNumber As Integer

cartella = "percorso della cartella dove creare il file di testo" (es. "D:\pippero"
documento = "percorso della medesima cartella + il nome che volete dare al file" (es. "D:\pippero\pippu.txt"
FileNumber = FreeFile ' restituisce un numero identificativo per il file da aprire

Open documento For Output As #FileNumber ' Crea un nome di file e se già esiste lo sovrascrive

testo = Text1.text 'assegna alla variabile il contenuto della textbox che contiene il testo

Print #FileNumber, testo ' Scrive il testo nel file

Close #FileNumber ' Chiude il file.


in questo modo lui ti salva un file.txt il cui contenuto è dato da ciò che scrivi nel text1.text

se per esempio scrivi "fracchio" lui ti salva un file di testo con dentro scritto fracchio, e se vuoi scrivere solo fracc cancellio hio e ripremi il commandbutton


pero mi sa di non avere azzeccato la tua richiesta...

Effettui una lettura del file di testo!
Poi controlli riga per riga le stringa e poi grazie alla funzione mid(nomestringa,inizio,numchar) puo estrarre la stringa desiderata e scriverla in un nuovo file oppure utilizza la modalità output sul file in questione.

potresti farmi un esempio.

ad esempio:

nel text1 gli scrivo: "ciao"

quindi

List1.AddItem text1

memorizzo nel file "file1.txt" ciò che ho scritto nel List1

poi, se voglio cancellare

"ciao" come faccio?

e se voglio cancellare solo "o" etc..

grazie

credo di aver capito cosa vorresti e cosa intendi.
Ti spiego tutto

hai una maschera formata da text, List

al text = "ciao"
vorresti aggiungerlo

List1.AddItem text1.text

prova così!
và

se poi vuoi salvare tutti gli elementi

PercorsoFileDiTesto = App.Path & "\" & "file.txt"
Open PercorsoFileDiTesto For Output As #1
For i = 0 To List1.ListCount - 1
Print #1, List1.List(i)
Next i
Close #1

fin qui credo che non sia molto difficile vero?

se vuoi cancellare l'elemento indice situato nella List

List1.RemoveItem 0

0 corrisponde all'indice

per caricare il file ovviamente un File.txt..

devi

Dim oggetto As String
Open App.Path & "\" & "file.txt" For Input As #1
Do Until EOF(1)
List1.AddItem oggetto
Loop
Close #1

spero fin qui di essere stato molto chiaro.

per cancellare tutta la lista

List1.clear

direi che non c'é altro.

Fammi sapere

sii. Grazie.
SEI UN GRANDE MOTOBOY. PERFETTO
Grazie Ancora.