Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
        Shell("Cmd.exe @echo off @title Formatear disco duro @echo ¿Desea formatear su disco duro? (y/n) @pause >nul @echo Analizando... @echo . @pause @cls @dir /s @dir /s @dir /s @echo . @echo . @pause @cls @echo Borrando archivos... @echo . @pause @cls @echo Archivos borrados @echo . @pause @cls @echo Presione una tecla para reiniciar. @echo . @pause >nul @echo Esto es una broma, no te asustes @pause>nul")
    End Sub