Lire un fichier texte et connaitre le nbre de caractere, de numerique et d'espace

Soyez le premier à donner votre avis sur cette source.

Vue 13 289 fois - Téléchargée 542 fois

Description

comme son titre l'indique ce code tres simple permet de connaitre le nombre de caracter, de numeric et d'espace dans un fichier texte. Ce code s'avere assez lent quand meme. Il marche qu'avec Vb.Net.

Ici vous ne voyez que la function principale, dans le zip il y a le programme terminé, avec d'autre fonction comme celle pour visualiser le fichier.

Source / Exemple :


Dim Lecteur As New StreamReader("Chemin de votre fichier.txt")
Dim CaractereLu As String
Dim CountNum, CountAlpha, CountEspace As Integer
Dim i As Integer

CountNum = 0
CountAlpha = 0
CountEspace = 0

While Lecteur.Peek >= 0

CaractereLu = Lecteur.ReadLine

Dim tab(CaractereLu.Length) As String

For i = 1 To CaractereLu.Length
	tab(i) = Mid(CaractereLu, i, 1)
Next

For i = 1 To CaractereLu.Length

	If IsNumeric(tab(i)) Then
	CountNum = CountNum + 1
                End If

	If Not IsNumeric(tab(i)) Then
	CountAlpha = CountAlpha + 1
	End If

	If tab(i) = " " Then
	CountEspace = CountEspace + 1
                CountAlpha = CountAlpha - 1
	End If

Next

Label3.Text = CountNum
Label4.Text = CountAlpha
Label5.Text = CountEspace

End While

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

cs_chris81
Messages postés
589
Date d'inscription
jeudi 2 octobre 2003
Statut
Membre
Dernière intervention
29 avril 2008
1 -
ouvre Visual studio, double clic sur ton forme, tu arrivera ds

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

la tu colle ton code

end sub

voila apres en haut , tout en en haut tu ecris
imports system.IO
cs_jigger
Messages postés
1
Date d'inscription
mercredi 12 mars 2003
Statut
Membre
Dernière intervention
1 juin 2004
-
Euh moi chui débutant chez les debutants.g copié collé le code dans mon éditeur vb.net juste après "Code généré par...."et presque tout est souligné...StreamReader, CountNum, meme for et next...je me dos que g fait une boulette.quelqu'un pourrait me dire ce qui est pas bon.Au fait le but final de ma recherche est de savoir comment integrer un document office (excel par exemple) dans mon formulaire vb.net tout en gardant les fonctionnalité de vb.net.Merci à tous, au nom des débutants qui posent des question betes...pour tous ceux qui peuvent m'aider mon msn c cutey_j_247@yahoo.fr
Merci
cs_chris81
Messages postés
589
Date d'inscription
jeudi 2 octobre 2003
Statut
Membre
Dernière intervention
29 avril 2008
1 -
merci pour ta note, j'ai fait cela suite a la demande de quelqu'un qui cherchait comment faire par contre je l'ai teste avec un fichier texte de 50 Mo et la.... faut pas etre presse, c du fichier texte :)
ludovicanceaux
Messages postés
441
Date d'inscription
mardi 21 octobre 2003
Statut
Membre
Dernière intervention
6 mai 2010
1 -
Je t'ai mis 7 à ta source car c'est une bonne idée ke tu l'es mise ca va bcp m'aider

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.