Microsoft pubblica il linguaggio di programmazione Visual Basic come parte della suite di sviluppo di Visual Studio. Tra i suoi molti usi è consentendo agli utenti di automatizzare le attività ripetitive, semplice nei loro computer che altrimenti necessari per l'esecuzione a mano. Un tale compito comune è rinominare file multipli, che quasi ogni utente di computer ha dovuto fare almeno una volta, spingendo molti a chiedersi se esiste un modo migliore.

Istruzioni

1

Creare un nuovo progetto in Visual Basic facendo clic su "File" -> "Nuovo progetto". Il nome "Rinomina".

2

Usa il mouse per trascinare i due componenti nel form dalla casella degli strumenti: un "pulsante" e "OpenFileDialog." Il "pulsante" verrà aggiunto al form e "OpenFileDialog" a una piccola casella grigia sotto il form.

3

Fare clic su "OpenFileDialog1." Nella finestra Proprietà, modificare la proprietà "Proprietà Multiselect" su "true". Ciò consente di selezionare più file.

4

Fare doppio clic "Button1" sul form. Verrà visualizzato il codice per tale pulsante all'interno di una subroutine denominata "Button1_Click".

5

Incollare il seguente all'interno della subroutine "Button1_Click":

OpenFileDialog1.ShowDialog()

Dim files As String() = OpenFileDialog1.FileNames()

Dim 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 In files

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

My.Computer.FileSystem.RenameFile(f, currentDate & "." & filename)

Next

Questo indica all'utente una finestra di selezione file di Windows e permette di selezionare i file. Crea quindi una stringa data. Infine, si passa attraverso ogni file, uno per uno e aggiunge la data all'inizio del nome del file.