Come faccio a rinominare più file con una data di utilizzo di Visual Basic?

November 10

Microsoft pubblica il linguaggio di programmazione Visual Basic come parte della suite di sviluppo Visual Studio. Tra i suoi molti usi sta permettendo agli utenti di automatizzare ripetitive, semplici compiti sui loro computer che altrimenti devono eseguire a mano. Un tale compito comune è rinominare file multipli, che quasi ogni utente di computer ha avuto a che fare almeno una volta - spingendo molti a chiedersi se esiste un modo migliore.

istruzione

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

2 Usa il mouse per trascinare due componenti nel form dalla casella degli strumenti: ". OpenFileDialog" a "Button" e un Il "Button" sarà aggiunto alla forma, e la "OpenFileDialog" per una piccola scatola grigia sotto il modulo.

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

4 Fare doppio clic su "Button1" sul modulo. Ciò apre il codice per quel pulsante all'interno di una subroutine denominata "Button1_Click".

5 Incollare il seguente all'interno del sottoprogramma "Button1_Click":

OpenFileDialog1.ShowDialog()

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

Dim currentDate come stringa = My.Computer.Clock.LocalTime.Date.Year & My.Computer.Clock.LocalTime.Date.Month & My.Computer.Clock.LocalTime.Date.Day

Per ogni f come stringa Nei file

il nome del file Dim come stringa = f.Substring (f.LastIndexOf ( "\") + 1, f.Length - f.LastIndexOf ( "\") - 1)

My.Computer.FileSystem.RenameFile (F, currentDate & "." & Nomefile)

Il prossimo

Questo mostra all'utente una finestra di selezione file di Windows e gli permette di selezionare i file. Si crea quindi una stringa data. Infine, passa attraverso ciascun file, uno per uno, e aggiunge la data all'inizio del nome del file.