davth
Messages postés5Date d'inscriptiondimanche 8 octobre 2006StatutMembreDernière intervention24 novembre 2006
-
12 oct. 2006 à 10:45
troxsa
Messages postés553Date d'inscriptionjeudi 28 novembre 2002StatutMembreDernière intervention 2 octobre 2016
-
13 oct. 2006 à 21:44
Bonjour à tous,
Débutant en vb, je souhaite effectuer du tri dans un fichier *.txt. Quelqun pourrait il m'indiquer quelle est la méthode (la plus simple) à utiliser pour faire un tri par ordre alphabétique ou supprimer des doublons par exemple. Merci pour votre aide...
cs_GeorgesDeLajungle
Messages postés29Date d'inscriptionlundi 22 mars 2004StatutMembreDernière intervention22 juin 20071 12 oct. 2006 à 11:02
Bonjour,
En t'aidant des différents sources et tutos tu devrais pouvoir récupérer les données de ton fichier texte dans un tableau. Tu souhaites faire un tri alphabétique, ton tableau sera donc un tableau de string. Utilise les fonctions de comparaisons pour trier ton tableau et retrouver les doublons.
(Regarde le msdn de .net sur les fonctions Icompare)
Tu as aussi la possibilité de créer une table datatable dans laquelle stocker tes valeurs de chaines de caractères et d'utiliser la fonction sort sur ta table. Tout dépend de ce que tu veux faire de ton fichier trié après le réécrire, utiliser les valeurs dans un datagrid ...
A toi de voir.
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 12 oct. 2006 à 12:56
Salut,
une autre technique consisterai à placer tes valeurs du fichier texte dans un nouveau classeur excel, tu fais un tri alpha-numériques, puis une extraction (sur place) sans doublons.
Ces 2 méthodes (tri + extraction sans doublons) sont gérées par Excel.
Il te suffit ensuite de relire ces données afin de les replacer dans le fichier texte.
@++
<hr width="100%" size="2" />
--Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
/DIV>
THE VIPER
Messages postés46Date d'inscriptionmercredi 2 juin 2004StatutMembreDernière intervention19 octobre 2006 12 oct. 2006 à 15:45
salut ,plus simple ,charge le fichier texte dans une ListBox le tri est inclu comme option et pour les doubles ,un code de genre
on error resume next ' si la longeur du listbox est change ...
for i=0 to list1.listcount-2
if list1.list(i)=list1.list(i+1) then list1.removeitem(i)' si il y a un double on le supprime .
next
PS:pour charger un fichier texte:
Sub Load_File(filename As String, Listb As ListBox)
Dim String_Buffer As String
Open filename For Input As #1
Do Until EOF(1)
Line Input #1, String_Buffer
Listb.AddItem String_Buffer
Loop
Close #1
End Sub