Ejemplo de código ne Visual Basic para modificar nombres de archivos contenidos en una carpeta.

Diseño del Formulario:

Imports System.IO
Public Class Form1

Private Sub browseButton_Click(sender As Object, e As EventArgs) Handles browseButton.Click
   If FolderBrowserDialog1.ShowDialog() = DialogResult.OK Then
        Dim folder As New DirectoryInfo(FolderBrowserDialog1.SelectedPath)
        Dim nomArchivo As String
        For Each file As FileInfo In folder.GetFiles()
            nomArchivo = file.Name
            nomArchivo = nomArchivo.Replace(".sql", "x.sql")
            'MsgBox(nomArchivo)
            My.Computer.FileSystem.RenameFile(FolderBrowserDialog1.SelectedPath & "\" & file.Name, nomArchivo)
            'filesListBox.Items.Add(file.Name)
            filesListBox.Items.Add(FolderBrowserDialog1.SelectedPath & "\" & nomArchivo)
        Next
    End If
End Sub

End Class

Descargar el ejemplo completo click aquí.