? Microsoft utgir Visual Basic programmeringsspråk som en del av Visual Studio-serien . Blant sine mange bruksområder er slik at brukerne å automatisere repetitive , enkle oppgaver på sine datamaskiner som de ellers trenger for å utføre for hånd . En slik felles oppgave er døpe flere filer, som nesten hver datamaskin brukeren har måttet gjøre minst en gang - ber mange til å lure på om en bedre måte eksisterer. Instruksjoner
en

Lag et nytt prosjekt i Visual Basic ved å klikke på "File " - " . New Project" > Name it " Batch Rename . "
2

Bruk musen til å dra to komponenter på skjemaet fra verktøykassen : en " knapp " og en " OpenFileDialog . " Den " Button" vil bli lagt til i skjemaet , og " OpenFileDialog " til en liten grå boks under skjemaet.
3

Klikk på " OpenFileDialog1 . " I Egenskaper-vinduet , endre " Flervalg " eiendom til "true ". Dette gjør at du kan velge flere enn én fil .
4

Dobbeltklikk på " Button1 " på skjemaet. Dette åpner koden for den knappen inne i en subrutine som heter
5

Lim inn følgende inne i " button1_click " subrutine " button1_click . " : En

OpenFileDialog1.ShowDialog ( )
< p > Dim filer Som String ( ) = OpenFileDialog1.FileNames ( )

Dim DAYNAME As String = My.Computer.Clock.LocalTime.Date.Year & My.Computer.Clock.LocalTime.Date.Month & My . Computer.Clock.LocalTime.Date.Day

Hver f As String In filer

Dim filnavn As String = f.Substring ( f.LastIndexOf ( "\\ ") + 1 , f . Lengde - f.LastIndexOf ( "\\ ") - " . " 1 )

My.Computer.FileSystem.RenameFile ( f, DAYNAME & & filename)

Neste
< p > Dette viser brukeren en Windows filvalgsdialogen og tillater ham å velge filene . Det skaper da en dato streng. Til slutt går det gjennom hver fil , en etter en , og føyer datoen til begynnelsen av filnavnet .