Verificare se esiste una maschera

di il
15 risposte

15 Risposte - Pagina 2

  • Re: Verificare se esiste una maschera

    07/06/2024 - sihsandrea ha scritto:


    07/06/2024 - AlbertoL ha scritto:


    Quando creo un programma so cosa ci metto dentro. Magari non so se un form è avviato, ma non capisco il senso di verificare che il form stesso esista..

    A che serve sapere se esiste un oggetto che ho messo nel progetto che sia a runtime che a design time?

    Utilizzo la stessa maschera (che rinomino a seconda se openargs è =1 oppure =2 con due sottomaschere differenti.

      strFrm(0) = "M_Inviomiefatt"
     strFrm(1) = "M_Inviosollpag"
     If FormExist(Application.CurrentProject, strFrm(1)) Then
       DoCmd.Rename strFrm(0), acForm, strFrm(1)
     End If
     Arg = 2
     DoCmd.OpenForm strFrm(0), , , , , , Arg

    questo è il motivo

    Quindi sappiamo che il form esiste e fa pure gli staordinari..

    Metti una variabile intera valori:

    0: libera

    1: inviomiefatture

    2: fai quell'altra cosa

    N: etc etc…

    Se la variabile è libera carichi le impostazioni e setti la variabile

    Se la variabile è<> zero messaggino “attendere prego…” pulsanti riprova e annulla… 

    L'avevi quasi previsto…

     If FormExist(Application.CurrentProject, strFrm(1)) Then

    Mancava lo stato neutrale…

    grazie per il suggerimento

Devi accedere o registrarti per scrivere nel forum
15 risposte