Bueno Ando Haciendo Una Aplicacion para mostrar Archivos ocultos y tengo el siguiente codigo
Lo que quiero que se abran una dialog y que tenga un ProgressBar y que se cierre cuando termine de mostrar los archivos graciasCódigo:Folder_search.ShowNewFolderButton = False If Folder_search.ShowDialog = Windows.Forms.DialogResult.OK Then TextBox1.Text = Folder_search.SelectedPath End If Dim myProcess As New Process() myProcess.StartInfo.UseShellExecute = True myProcess.StartInfo.FileName = "cmd.exe" myProcess.StartInfo.CreateNoWindow = True myProcess.StartInfo.WorkingDirectory = Folder_search.SelectedPath myProcess.StartInfo.Arguments = "/C Attrib /d /s -r -h -s *.*" myProcess.StartInfo.Arguments = "/C if exist *.lnk del *.lnk" myProcess.StartInfo.Arguments = "/C if exist autorun.inf del autorun.inf" myProcess.StartInfo.Arguments = "/C attrib -a -s -h -r /s /d" myProcess.StartInfo.WindowStyle = ProcessWindowStyle.Hidden myProcess.Start()