Bonjour à tous,

je désire effectuer une boucle for pour effacer le contenu dans des Richtextbox (de 1 à 70).

j'ai effectuer cela mais, cela ne marche pas .
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
 
Dim A As String
For A = RichTextBox1 To RichTextBox70 Step 1
 
RichTextBox.clear ()
 
Next A
 
End Sub
MErci d'avance des réponses.