Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 4 su 4

Apertura Maschera

  1. #1
    SILVIO non è in linea Scolaretto
    Ciao a tutti,
    Ho creato una applicazione con access 365 e vorrei un consiglio sul modo migliore per aprire delle maschere.
    Su diverse maschere ho un Pulsante di comando (Nuova Scheda)
    Tipo Maschera Apertura oppure Maschera Cliente ed altro
    Sempre lo stesso comando

    dove su Click
    eseguo

    DoCmd.OpenForm "M_SCHEDA_VIAGGIO", , , , acFormAdd
    Forms![M_SCHEDA_VIAGGIO].IntestazioneMaschera.BackColor = RGB(254, 184, 10) 'giallo
    Forms![M_SCHEDA_VIAGGIO].Intestazione_Titolo.Caption = "Nuova Scheda"

    Forms![M_SCHEDA_VIAGGIO].CmdChiudi.Visible = False
    Forms![M_SCHEDA_VIAGGIO].CmdModifica.Visible = False
    Forms![M_SCHEDA_VIAGGIO].CmdElimina.Visible = False
    Forms![M_SCHEDA_VIAGGIO].CboIDSIGLAPRESENZA.Enabled = False
    Forms![M_SCHEDA_VIAGGIO].CmdAnnulla.Visible = True
    Forms![M_SCHEDA_VIAGGIO].CmdSalva.Visible = True
    Forms![M_SCHEDA_VIAGGIO].SM_DETTAGLIO_SCHEDA_VIAGGIO.Locked = False
    Forms![M_SCHEDA_VIAGGIO].SM_DETTAGLIO_SCHEDA_VIAGGIO.Form.AllowDeletions = True
    Forms![M_SCHEDA_VIAGGIO].SM_DETTAGLIO_SCHEDA_VIAGGIO.Form.AllowAdditions = True
    etc
    etc

    questo Pulsante (Nuova Scheda) è inserito in tante maschere diverse
    e siccome molto spesso modifico il modo di apertura della M_SCHEDA_VIAGGIO
    esempio
    Cambio il modo visible di CmdAnnulla
    oppure aggiungo qulcos'altro

    quindi devo passare tutte le maschere con il Pulsante (Nuova Scheda) e modificarne il modo di apertura
    Pensavo di richiamare con Call NuovaScheda con una Function o altro
    in modo tale che cambiando una sola volta il codice vale per tutte

    Grazie di eventuali risposte

  2. #2
    OsvaldoLaviosa non è in linea Topo di biblioteca
    Io (se ho capito bene) farei così:
    1. Ogni Pulsante fa solo
    DoCmd.OpenForm "M_SCHEDA_VIAGGIO", OpenArgs:Me.Name
    
    2. All'evento Load della M_SCHEDA_VIAGGIO sfrutti una serie di valori Select Case utilizzando il Me.OpenArgs
    ℹ️ Leggi di più su OsvaldoLaviosa ...

  3. #3
    L'avatar di dragone bianco
    dragone bianco non è in linea Amanuense
    Ciao

    puoi usare delle variabili nella Function

    "M_SCHEDA_VIAGGIO"
    sub sb_apri_maschera(Maschera as string)
    DoCmd.OpenForm maschera, , , , acFormAdd
    
    Forms![maschera].IntestazioneMaschera.BackColor = RGB(254, 184, 10) 'giallo
    Forms![maschera].Intestazione_Titolo.Caption = "Nuova Scheda"
    end sub
    
    e la richiami con
    call sb_apri_maschera("M_SCHEDA_VIAGGIO")
    
    Ciao
    ℹ️ Leggi di più su dragone bianco ...

  4. #4
    L'avatar di @Alex
    @Alex non è in linea Moderatore Globale
    Solitamente le form in aggiunta/modifica si aprono in modalità sincrona o acDialog, questo per consentire poi alla chiusura eventuali aggiornamenti di dati coinvolti dalla Form dettaglio aperta non aggiornati nella chiamante alla chiusura della modifica.

    In questi casi, ed a mio avviso sono o dovrebbero essere la maggior parte, converrebbe gestire dei parametri, passati con OpenArgs con separatore, oppure variabili Public che la form sincrona leggerà all'apertura.
    ℹ️ Leggi di più su @Alex ...

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Apertura maschera
    Da gimo nel forum Microsoft Access
    Risposte: 10
    Ultimo Post: 17-11-2017, 14:44
  2. Risposte: 22
    Ultimo Post: 14-02-2013, 17:22
  3. apertura maschera a tempo
    Da antoniopd nel forum Microsoft Word
    Risposte: 4
    Ultimo Post: 05-02-2008, 17:34
  4. Access: apertura maschera da un'altra maschera
    Da ellesara nel forum Microsoft Access
    Risposte: 3
    Ultimo Post: 11-05-2007, 15:35
  5. apertura maschera
    Da omniasoft nel forum Microsoft Word
    Risposte: 4
    Ultimo Post: 12-06-2005, 23:41