C# / VB.NET - Sostituire caratteri in visual basic 2008

Forum - C# / VB.NET - Sostituire caratteri in visual basic 2008

AndreaCosci (Normal User)
Newbie

Messaggi: 2
Iscritto: 08/02/2010

Postato alle 19:00
Lunedì, 08/02/2010

Salve sono nuovo del forum,
Mi chiedevo come in visualbasic si potessero sostituire i prmi 7 caratteri di ogni riga
di un richtextbox con questo carattere " "
ES:
12312312312313123123123
123123123123123123123123
12312312312312312312312
1231231231231231231232
DIVENTA:
       2312313123123123
       23123123123123123
       2312312312312312
       231231231231232
PS: Dato che non so quali saranno i primi 7 caratteri NON posso usare
RichTextBox1.text.replace("1"," ")

()
Newbie

Messaggi:
Iscritto:

Postato alle 20:24
Lunedì, 08/02/2010

Io non uso visual basic molto spesso e non sono proprio pratico di stringhe... Ma ragionando sul pascal io farei una cosa del genere.
Innanzitutto metterei in una variabile string chiamata per esempio FRASE tutti i caratteri inseriti nella RichTextBox.
Una volta avuta questa stringa io in pascal procedo in questo modo:

Codice sorgente - presumibilmente Delphi

var FRASE1 : string
(*...*)
FRASE1 := '';
For i:= 7 To Length(FRASE) Do FRASE1:= FRASE1 + FRASE[i];
FRASE:= FRASE1

cioè inserirei una nuova variabile FRASE1 vuota e con un contatore che va da 7 alla lunghezza della tua FRASE, questa nuova variabile assumerà tutti i caratteri della vecchia a partire dal 7°. Infine Passi il valore di FRASE1 in FRASE e questa la butti dentro la RichTextBox o ne fai l'uso che vuoi...

Spero di essere stato chiaro altrimenti chiedi

PS: il codice è volutamente pascal proprio perchè non conosco quello VB .NET

walker93 (Member)
Expert

Messaggi: 460
Iscritto: 31/01/2010

Postato alle 20:56
Lunedì, 08/02/2010

provo a convertirlo io

Codice sorgente - presumibilmente VB.NET

dim frase1 as string = ""
for i=7 to len(frase)
frase1= frase1 & mid(frase,i,1)
next
frase= frase1

e questo per una riga quindi dovrai assegnare 'frase' alla riga da prendere tramite un altro ciclo

Ultima modifica effettuata da walker93 il 08/02/2010 alle 20:58

Poggi Marco (Member)
Guru

Messaggi: 969
Iscritto: 05/01/2010

Postato alle 0:23
Martedì, 09/02/2010

Ciao AndreaCosci!

Come mai hai iniziato due topic con lo stesso messaggio?

Il Totem (Admin)
Guru^2

Messaggi: 3635
Iscritto: 24/01/2006

Postato alle 10:04
Martedì, 09/02/2010

Più semplicemente, data la stringa che rappresenta una linea, puoi ottenere la nuova stringa così:

Codice sorgente - presumibilmente VB.NET

Dim Line As String = ...
Dim NewLine As String = (New String(" ", 7)) & Line.SubString(7)

Ossia il carattere " " ripetuto 7 volte, seguito dalla parte di stringa che inizia alla posizione 7 (ossia tutta la linea tranne i primi 7 caratteri).