Condividi tramite

Access 2007: intercettare la pressione del tasto ESC

Anonimo
2011-11-02T14:23:56+00:00

Salve,

ho una maschera creata con Access 2007, in cui si trovano alcune caselle di testo che accettano solo valori numerici.

Ho inserito un'etichetta per rappresentare il totale e sull'evento BeforeUpdate di ogni casella di testo richiamo la seguente funzione:

Private Sub EseguiSomma()

     Dim tot As Integer

     tot = CasellaTesto1.Value + ... + CasellaTestoN.Value

     EtichettaTotale.Caption = tot

End Sub

Quando inserisco un numero in una casella di testo e sposto il focus altrove, la funzione lavora correttamente e aggiorna l'etichetta con il valore della somma.

Il mio problema è il seguente: se premo ESC tutti i valori contenuti nelle caselle di testo si azzerano. Vorrei sapere se è possibile intercettare la pressione del tasto ESC per aggiornare di conseguenza l'etichetta con il totale.

Ringrazio in anticipo per ogni aiuto o suggerimento.

Microsoft 365 e Office | Access | Per la casa | Windows

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti Nessun commento

Risposta accettata dall'autore della domanda

  1. Anonimo
    2011-11-02T15:05:56+00:00

    Ciao Roberto,

    conviene eliminare tutto il codice e inserire una casella testo al posto dell'etichetta.

    Nell' origine controllo della casella testo metti = CasellaTesto1.Value + ... + CasellaTestoN.Value

    In questo modo e  senza alcun codice, il totale verrà aggiornato, tasto Esc incluso.

    Eventualmente disabilita la nuova casella testo con Abilitato = No e Bloccato = sì e imposta lo sfondo e i bordi come li avevi sull'etichetta per dare lo stesso comportamento e layout che avevi sull'etichetta.

    Ciao

    Giorgio Rancati

    La risposta è stata utile?

    0 commenti Nessun commento

1 risposta aggiuntiva

Ordina per: Più utili
  1. Anonimo
    2011-11-03T10:44:26+00:00

    Ti ringrazio, facendo come hai suggerito funziona perfettamente!

    La risposta è stata utile?

    0 commenti Nessun commento