[VB.NET] Visualizzare conteggio dei caratteri rimanenti in TextBox

[omaggi]

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!

[gibra]

Cioè, come hai provato?
Mostra il codice...

[omaggi]

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.

[alka]

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.