Scelta evento su cancellazione testo

di
Antony73
il
8 risposte
A
Antony73
Utente Attivo
Iscritto da
dic, 2022
Messaggi:
497

Scelta evento su cancellazione testo

Buongiorno a  tutti,

Ho da porre il seguente quesito: Ho una textbox ed un pulsante. La necessità è quella di disabilitare il pulsante qualora la lunghezza del testo sia pari a zero. Riccorendo aìl'evento Keyup gestisco bene col codice scritto sotto, eccetto che per una caso:

Private Sub mio_testo_KeyUp(KeyCode As Integer, Shift As Integer)
If len(me!mio_testo.text)=0 Then 
	me!pulsante.enabled=false

else

	me!pulsante.enabled=true

end if
End Sub

Qualora si verificasse che l'utente dopo avere selezionato tutto il testo prema il tasto canc, la lunghezza del testo diventa pari a zero ma il pulsante permane nello stato enebled=true. Come procedere in questo caso?

8 Risposte

  • E
    ettore56
    Molto attivo
    Iscritto da
    mag, 2017
    Messaggi:
    661

    Re: Scelta evento su cancellazione testo

    Aggiungi al “Dopo Aggiornamento”:

    Private Sub mio_testo_AfterUpdate()

If Len(Me!mio_testo.text) = 0 Then
    Me!Pulsante.Enabled = False
Else
    Me!Pulsante.Enabled = True
End If

End Sub
  • S
    Stifone
    Utente Attivo
    Iscritto da
    mar, 2019
    Messaggi:
    336

    Re: Scelta evento su cancellazione testo

    Usa

    Private Sub mio_testo_Change()
    Me.pulsante.Enabled = Not Len(Me.mio_testo.Text) = 0
End Sub

    naturalmente  ti devi preoccupare al caricamento della maschera di controllare se in mio_testo non c'è scritto nulla

    Private Sub Form_Load()
    Me.pulsante.Enabled = Not Len(Me.mio_testo & "") = 0
End Sub
  • @Alex
    @Alex
    Super Famoso
    Iscritto da
    feb, 2012
    Messaggi:
    8740

    Re: Scelta evento su cancellazione testo

    Temo che il controllo contenga NULL non intercettabile da Len… Prova a forzare il casting

    Private Sub mio_testo_KeyUp(KeyCode As Integer, Shift As Integer)
  Me!Pulsante.Enabled = len(me!mio_testo.text & vbnullstring)>0
End Sub
  • A
    Antony73
    Utente Attivo
    Iscritto da
    dic, 2022
    Messaggi:
    497

    Re: Scelta evento su cancellazione testo

    Soluzioni già adoperate ma non funzionanti.

  • S
    Stifone
    Utente Attivo
    Iscritto da
    mar, 2019
    Messaggi:
    336

    Re: Scelta evento su cancellazione testo

    Sono testate e funzionano perfettamente, quindi se vuoi un aiuto posta un file di esempio e ti si fa vedere come lavorare.

  • A
    Antony73
    Utente Attivo
    Iscritto da
    dic, 2022
    Messaggi:
    497

    Re: Scelta evento su cancellazione testo

    Hai ragione funzione. Mi sono accorto che Interferisce con altre condizioni imposte in evento keyup. Ci ragiono sopra, grazie.

  • S
    sihsandrea
    Molto attivo
    Iscritto da
    feb, 2011
    Messaggi:
    1560

    Re: Scelta evento su cancellazione testo

    Pulsante.disabilitato=(edit.testo='')

    Su evento change della casella di testo

    Una sola riga di codice…

  • S
    sihsandrea
    Molto attivo
    Iscritto da
    feb, 2011
    Messaggi:
    1560

    Re: Scelta evento su cancellazione testo

    A modo tuo…

    Sempre su evento change…

    me!pulsante.enabled=(len(me!mio_testo.text)=0)

Devi accedere o registrarti per scrivere nel forum
8 risposte