Oppure

Loading
16/01/14 18:52
dylan666
Salve a tutti, spero mi aiuterete a risolvere questo piccolo problema...
Ho un file di testo del quale devo sostituire alcune parti ma anche eliminare qualche riga.

Ho usato questo codice:

SNextLine = Replace$(SNextLine, SNextLine, "")


Ma così facendo rimane una riga vuota!
Mentre io voglio togliere la riga totalmente e fare in modo che quella precedente e quella successiva a quella da eliminare diventino consecutive.

Ho cercato in Internet e pare un problema comune ma non ho trovato una risposta convincente...
Riuscite a farmi usare sempre il Replace o devo cambiare approccio?

Grazie anticipatamente
aaa
16/01/14 21:26
nessuno
Ma SNextLine cosa è? Una stringa?

E qual è il resto del codice?

In generale, per eliminare una linea devi leggere il file e scriverne un altro senza quella linea.
Ricorda che nessuno è obbligato a risponderti e che nessuno è perfetto ...
---
Il grande studioso italiano Bruno de Finetti ( uno dei padri fondatori del moderno Calcolo delle probabilità ) chiamava il gioco del Lotto Tassa sulla stupidità.
17/01/14 16:48
dylan666
Ho capito l'errore.

Prima il codice per ricostruire il testo riga per riga era questo:

txt_risultati.Text = txt_risultati.Text & SNextLine & vbCrLf


Edesso ho creato una variabile Boolean chiamata SaltaRiga che decide se mettere o no il ritrorno a capo dopo la riga:

If SaltaRiga = True Then
txt_risultati.Text = txt_risultati.Text & SNextLine
Else
txt_risultati.Text = txt_risultati.Text & SNextLine & vbCrLf
End If
Ultima modifica effettuata da dylan666 17/01/14 17:01
aaa
17/01/14 21:39
TheDarkJuster
basta che su testo da sostituire ci metti anche \n alla fine se ho capito bene........
aaa