Para eso puedes agregar un Textbox mas un drivelistbox y un dirlistbox, sincronizalos y cuando el usuario seleccione la unidad y el directorio lo especificas en el codigo RETVAL = Shell("c:\archivos de programa\winrar\rar a -u -r -m5 c:\respaldo c:\inia971.mdb")
Tambien puedes utilizar variables...
Ahora vamos a analizar este codigo, supuestamente C:\respaldo es el origen, y donde está C:\inia971.mdb no tendria que estar el destino?
Trata ponerlo así a ver que tal:
RETVAL = Shell("c:\archivos de programa\winrar\rar a -u -r -m5 c:\respaldo\inia971.mdb Text1.Text") 'por ejemplo
Usalo y me dices que tal...