Casella di controllo che interagisce con Pulsante di Comando

di
Anonimizzato11333
il
3 risposte

Casella di controllo che interagisce con Pulsante di Comando

Gentili iscritti
Avrei da farvi una domanda:
qual' è il codice che mi permette di attivare un "pulsante comando" utilizzando una "casella di controllo"? Vale a dire se non è spuntato la casella di controllo, il pulsante deve essere inattivo.
Ringraziando anticipatamente, vi porgo distinti saluti.

3 Risposte

  • Re: Casella di controllo che interagisce con Pulsante di Comando

    Io ti rispondo con una macro, poi puoi sempre tradurla in Visual Basic.

    1) Apri una nuova macro in visualizzazione struttura e apri la colonna Condizioni
    2) Nel primo rigo, colonna Condizioni scrivi:
    [Maschere]![NomeMaschera]![NomeCasellaControllo]=Vero
    colonna Azioni: ImpostaValore, e sotto
    Elemento: [Maschere]![NomeMaschera]![NomePulsante].[Enabled]
    Espressione: Vero
    3) Nel secondo rigo, colonna Condizioni scrivi tre puntini (...) che significa idem come sopra
    colonna Azioni: ArrestaMacro
    4) Nel terzo rigo, colonna Condizioni scrivi:
    [Maschere]![NomeMaschera]![NomeCasellaControllo]=Falso
    colonna Azioni: ImpostaValore, e sotto
    Elemento: [Maschere]![NomeMaschera]![NomePulsante].[Enabled]
    Espressione: Falso
    5) Salva la macro con nome "AbilitaPulsante"
    6) Vai in visualizzazione struttura maschera e associa all'evento "Su corrente" della maschera la macro AbilitaPulsante. Devi anche associare all'evento "Dopo aggiornamento" della "casella di controllo" la stessa macro, in modo che il pulsante ti si abilita/disabilita anche al cambio di valore quando sei posizionato su un singolo record.

    L'ho testato e funziona.
    P.S.: ti consiglio di cancellare il post "Pulsante du"
  • Re: Casella di controllo che interagisce con Pulsante di Comando

    Propongo questo se ho capito bene...
    
    Private Sub Form_Load()
       Me.NomeChek.SetFocus
       Me!nomebutton.Enabled=Me.NomeCheck.Value
    End Sub
    
    Private Sub Form_Current()
       Me.NomeChek.SetFocus
       Me!nomebutton.Enabled=Me.NomeCheck.Value
    End Sub
    
    Private sub NomeCheck_AfterUpdate()
       Me!nomebutton.Enabled=Me.NomeCheck.Value
    End Sub
    Non hai detto come si deve comportare su NUOVO RECORD... nel caso si approccia nell'evento CURRENT usando la Proprerty [NewRecord] per implementare il condizionante....
  • Re: Casella di controllo che interagisce con Pulsante di Comando

    @Alex ha scritto:


    Non hai detto come si deve comportare su NUOVO RECORD... nel caso si approccia nell'evento CURRENT usando la Proprerty [NewRecord] per implementare il condizionante....
    In questo caso, suggerisco di impostare un Valore predefinito (Vero o Falso che sia) sulla casella di controllo.
Devi accedere o registrarti per scrivere nel forum
3 risposte