? Microsoft veröffentlicht die Programmiersprache Visual Basic als Teil der Visual Studio-Entwicklungsumgebung suite. Unter seinen vielen Anwendungen wird so dass Anwender sich wiederholende , einfache Aufgaben auf ihren Computern , die sie sonst brauchen, um von Hand durchführen zu automatisieren. Eine solche gemeinsame Aufgabe ist Umbenennen von mehreren Dateien , die fast jeder Computer-Nutzer mussten mindestens einmal zu tun hat - woraufhin viele zu fragen, ob ein besserer Weg existiert. Anleitung
1
Erstellen eines neuen Projekts in Visual Basic , indem Sie auf " Datei" - " . Neues Projekt" > Nennen Sie es " Stapel-Umbenennung ".
2
Verwenden Sie Ihre Maus, um zwei Komponenten auf das Formular ziehen aus der Toolbox : einen "Button" und eine " OpenFileDialog . " Der "Button" wird in das Formular eingefügt werden , und die " OpenFileDialog " zu einem kleinen grauen Kasten unter Ihrem Formular .
3
Klicken Sie auf " OpenFileDialog1 . " Im Fenster Eigenschaften ändern " Multiselect " -Eigenschaft auf "true". Dies ermöglicht Ihnen, mehr als eine Datei auszuwählen.
4
Doppelklicken Sie auf " Button1 " auf dem Formular . Dies öffnet den Code für diese Schaltfläche innerhalb einer Unterroutine namens
5
Fügen Sie den folgenden in der " Button1 " Subroutine " Button1 . ":
OpenFileDialog1.ShowDialog ()
< p> Dim Dateien 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 Dateien
Dim Dateiname As String = f.Substring ( f.LastIndexOf ("\\" ) + 1, f . Länge - f.LastIndexOf ("\\" ) - " . " 1) german
My.Computer.FileSystem.RenameFile (f, currentDate & & Dateiname)
Weiter
< p > Dies zeigt dem Benutzer eine Windows-Datei- Auswahl-Dialog und ermöglicht es ihm, die Dateien auszuwählen. Es erstellt dann eine Datums-String . Schließlich geht es durch jede Datei , eins nach dem anderen , und fügt das Datum an den Anfang des Dateinamens .