Microsoft publiceert de Visual Basic programmeertaal als onderdeel van de Visual Studio ontwikkeling suite. Onder zijn vele toepassingen is zodat gebruikers repetitieve , eenvoudige taken op hun computers die ze anders moeten uitvoeren door de hand te automatiseren . Een dergelijke gemeenschappelijke taak is het hernoemen van meerdere bestanden , die bijna elke computergebruiker heeft moeten doen minstens een keer - gevraagd veel af te vragen of een betere manier bestaat. Instructies 1 Maak een nieuw project in Visual Basic door te klikken op " File " - " . New Project " > Noem maar op "Batch Rename . " Kopen van 2 Gebruik je muis om twee onderdelen op uw formulier uit de toolbox te slepen : een " knop " en een " OpenFileDialog . " De " Button " zal worden toegevoegd aan het formulier , en de " OpenFileDialog " naar een kleine grijze vak hieronder je formulier . 3 Klik op de " OpenFileDialog1 . " In het venster Eigenschappen , verander de " Multiselect " eigenschap in op " true ". Dit stelt u in staat om meer dan een bestand te selecteren . Dubbelklik op " Button1 " 4 op uw formulier . Dit opent de code voor die knop binnen een subroutine genoemd 5 Plak volgende in het " Button1_Click " subroutine " Button1_Click . " : OpenFileDialog1.ShowDialog ( ) op Dim bestanden 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 voor Elke f als String In bestanden Dim bestandsnaam As String = f.Substring ( f.LastIndexOf ( " \\ " ) + 1 , f . Lengte - f.LastIndexOf ( " \\ " ) - " . " 1 ) My.Computer.FileSystem.RenameFile ( f , HuidigeDatum & & bestandsnaam ) op Twitter Volgende Dit geeft de gebruiker een dialoogvenster Windows -bestand en stelt hem in staat om de bestanden te selecteren . Het maakt vervolgens een datum string. Tenslotte gaat het door elk bestand , een voor een , en voegt de datum aan het begin van de bestandsnaam .
|