Visualizzazione dei risultati da 1 a 4 su 4
  1. #1
    Utente di HTML.it L'avatar di omaggi
    Registrato dal
    Sep 2009
    Messaggi
    25

    [vba - Access 2007]

    Ciao a tutti.
    Per il mio progetto ho in una maschera una textbox che può contenere al max 255 caratteri. Infatti sono riuscito a "fermare" la dicitura quando si arriva a 255.

    Cmq mi piacerebbe da parte a questa textbox mettere una label o textbox che mi indichi, dinamicamente (cioé dopo ogni carattere scritto), l'ammontare di carattere che posso ancora scrivere. Praticamente un contatore...

    Ho provato in diversi modi, ma non riesco a farlo dinamico...

    Qualcuno mi sa' aiutare, thx. Ciao!

  2. #2

  3. #3
    Utente di HTML.it L'avatar di omaggi
    Registrato dal
    Sep 2009
    Messaggi
    25
    Eccoti il codice:

    Private Sub txtCommento_KeyUp(KeyCode As Integer, Shift As Integer)
    If (255 > Len(txtCommento)) Then
    txtCount = 255 - Len(txtCommento) & " caratteri ancora disponibili"
    Else
    txtCount = "caratteri esauriti"
    End If
    End Sub



    txtCount é la textbox dove dovrà apparire il "countdown" dei caratteri restanti, mentre txtCommento é la textbox ove potrò scrivere al max 255.

    Momentaneamente la txtCommento si "ferma" quando arriva a 255. Questo l ho risolto usando un codice che sfrutta la proprietà "TAG":
    Private Sub txtCommento_KeyDown(KeyCode As Integer, Shift As Integer) 'blocca la scrittura dopo 255 caratteri
    On Error GoTo ErrHandle
    Select Case KeyCode
    Case 8, 46
    Case Else
    If Len(Me.txtCommento.Text) > txtCommento.Tag - 1 Then KeyCode = 0
    End Select
    ErrHandle:
    If Err.Number = 0 Then Exit Sub
    MsgBox "Errore numero: " & Err.Number & " Descrizione: " & Err.Description & " Sorgente: " & Err.Source & " Evento: CAP_KeyDown "
    End Sub



    Qualche idea di come fare?
    Thx.

  4. #4
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,466

    Moderazione

    Originariamente inviato da omaggi
    [vba - Access 2007]
    Oltre al linguaggio, è necessario indicare anche una descrizione significativa del problema nel titolo, come richiesto dal Regolamento.

    Qui ho corretto io. Tienilo a mente per il futuro.
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.