Calma e sangue freddo... e soprattutto smettila di dare continuamente capocciate altrimenti non ci capisci veramente più niente!!!

Dunque, prima di tutto devi inserire tra i Componenti:
"Microsoft Common Dialog Control 6.0 (sp3)"
(se non sai come inserire nuovi componenti segui le istruzioni di seguito:
Menu Progetto --> Componenti --> Microsoft Common Dialog Control 6.0 (sp3))

Poi disegni l'oggetto CommonDialog che hai sulla casella degli strumenti sul form;
a questo punto sul click del menu Salva o Salva con nome scrivi il codice di esempio che ti ho scritto (io lo faccio con Salva con nome..."):
codice:
Private Sub mSalvaConNome_Click()
       
     CDSalva.Flags = &H2
     CDSalva.ShowSave
        
End Sub