Tengo una pequeña pregunta...
Si por ejemplo yo uso "Label1.Text = CStr(Len(Textbox1.text))"
Hay dice que vaya aumentando la cifra del label según los caracteres del txtbox.
Ahora lo que necesito es que disminuya ejemplo.
Si tengo en un label "20" y quiero que al escribir vaya descendiendo como lo podría hacer?
Thanks ;)
Tendrías que tener una variable con la cantidad inicial.. y restarle lo que ya tienes..
Se me ocurrio algo asi:
Private Sub txtTexto_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtTexto.KeyUp
lblNum.Text = lblNum.Text - 1
End Sub
Previamente le tendrias que haber asignado al label el valor a partir del cual queres que cuente.
Un saludo ;)
Criska me funciono bien el codigo pero el problema es que al borrar me sale el caracter con el -1.
Lo puse en el textchanged del txtbox y trate con varios if pero me sigue saliendo alguna idea?
Podrias poner algo asi, pero igualmente tiene algunos problemas:
Dim num As Integer
Private Sub txtTexto_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtTexto.KeyUp
num = lblNum.Text
If num > 0 Then
lblNum.Text -= 1
End If
End Sub
Con este codigo, si superas la cantidad de caracteres mostrados en el label, el contador va a permanecer en cero, evitando los numeros negativos (Podrias poner algo como que al llegar a cero, el TextBox pase a modo de solo lectura).
Pero sigue teniendo algunos problemas, por ejemplo, si borras carecteres, el contador no se incrementa.
Estoy tratando de solucionarlo, soy bastante nuevo en vb.net :P
Un saludo ;)