Oppure

Loading
08/02/10 17:46
AndreaCosci
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"," ";)
aaa
08/02/10 18:34
Alfonso
Dim s() As String
s = Split(RichTextBox1.Text, vbCrLf)
For i = 0 To UBound(s())
    Mid(s(i), 1, 7) = Space(7)
Next
RichTextBox1.Text = ""
For i = UBound(s()) To 0 Step -1
    RichTextBox1.Text = RichTextBox1.Text & s(i) & vbCrLf
Next
End Sub


Ciao
aaa