? Microsoft publie le langage de programmation Visual Basic dans le cadre de la suite de développement Visual Studio. Parmi ses nombreuses utilisations , permettent aux utilisateurs d'automatiser des tâches répétitives et simples sur leurs ordinateurs qu'ils n'auraient besoin d'effectuer à la main. Une telle tâche commune est de renommer plusieurs fichiers, dont près de chaque utilisateur d'ordinateur a dû faire au moins une fois - qui incite plusieurs à se demander si une meilleure solution existe. Instructions
1
Créer un nouveau projet dans Visual Basic en cliquant sur " Fichier" -> "Nouveau projet ". Nommez-le " Batch Rename ".
2
Utilisez votre souris pour faire glisser deux composants sur votre formulaire de la boîte à outils : un "bouton " et un " OpenFileDialog . " Le "Button" sera ajouté à la forme , et le " OpenFileDialog " pour une petite boîte grise en dessous de votre formulaire.
3
Cliquez sur le " OpenFileDialog1 . " Dans la fenêtre Propriétés, modifiez la " Sélection multiple " propriété "true ". Cela vous permet de sélectionner plusieurs fichiers .
4
Double -cliquez sur " Button1" sur votre formulaire . Cela ouvre le code pour ce bouton dans un sous-programme nommé
5
Collez le texte suivant à l'intérieur du sous-programme " Button1_Click " " Button1_Click . ":
OpenFileDialog1.ShowDialog ()
< p > fichiers As String () = OpenFileDialog1.FileNames ()
CurrentDate As String = My.Computer.Clock.LocalTime.Date.Year & My.Computer.Clock.LocalTime.Date.Month & My . Computer.Clock.LocalTime.Date.Day
For Each f As String Dans les fichiers
de fichier As String = f.Substring ( f.LastIndexOf ( "\\" ) + 1, f . Longueur - f.LastIndexOf ( "\\" ) - " ". 1)
My.Computer.FileSystem.RenameFile (f, CurrentDate & & filename)
Suivant
< p > Cela montre à l'utilisateur une boîte de dialogue de sélection de fichier Windows et lui permet de sélectionner les fichiers . Il crée ensuite une chaîne de date . Enfin, il parcourt tous les fichiers , un par un, et ajoute la date de début du nom du fichier.