Nom de fichier sans extension

Soyez le premier à donner votre avis sur cette source.

Vue 4 133 fois - Téléchargée 243 fois

Description

Ce programme renvoie dans une textbox le nom de fichier sans extension. Gere plusieurs points.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Renfield
Messages postés
17283
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
56 -
oui , va pour l'aspect didactique de la chose , peut être aurais-tu pu mettre le code directement sur le site :

'Renvoie le nom de fichier et cherche le 1er point à partir de la droite
Pnt = InStrRev(nomFichier, ".")
'Retourne la chaîne en conservant le nom à gauche du 1er point
Fichier1$ = Left$(nomFichier, Pnt - 1)
'Affiche le nom de fichier sans extension
Text1.Text = Fichier1
BlackCrystal
Messages postés
7
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
17 juillet 2004
-
C'est vrai c'est plus rapide.
Mais c'est mes débuts sur ce site.
N'oublions pas de déclarer la variable
Dim Fichier1 As String
yoman64
Messages postés
962
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
2 août 2010
-
Deja sur le site
7/10 a cause que c deja sur le site...
cyberlulu
Messages postés
62
Date d'inscription
dimanche 10 novembre 2002
Statut
Membre
Dernière intervention
26 juin 2008
-
Merci yoman64
Voilà ma source : http://forum.vbfrance.com/article.aspx?Val=8012

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.