Bonjour le forum,
Je commence mon tout premier programme en VB (j'ai des bases en VBA) et j'ai besoin de vos lumières...
Ce programme consiste à ouvrir un fichier texte dans un RichTextBox et puis à y mettre des filtres (même si des logiciels faits pour çà existent déjà).
J'ai réussi à ouvrir mon fichier texte dans ma RichTextBox par contre pour les filtres çà se gâte...
Actuellement, je passe par une boucle For mais c'est interminable (plus de 7 000 lignes) et je me demandais s'il n'existait pas à votre connaissance une solution simple et efficace pour éviter cette boucle.
J'avais aussi imaginé mettre le contenu de cette RichTextBox dans une variable Tableau pour que les filtres soient reversible mais là encore, je ne sais le faire qu'en passant par une boucle et là encore c'est interminable... Voici le petit bout de code associé :
Merci de votre aide!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Public EntireText(0) As String Private Sub MiseEnMemoire() Dim iter, i As Long iter = RichTextBox1.Lines.Length - 1 ReDim EntireText(iter) For i = 0 To iter - 1 EntireText(i) = RichTextBox1.Lines(i + 1) 'EntireText(i) = "" Next End Sub
Partager