Public Sub WriteRegistro(ByVal NomeRegistro As String, ByVal Valore As String)
        My.Computer.Registry.SetValue("HKEY_CURRENT_USER\Software\MyBackupper", NomeRegistro, Valore)
    End Sub