Tengo un label que cuenta cada elemento a medida que voy ingresandolos al listbox con un botón.
Y al seleccionar un item y eliminarlo (con otro botón), el label muestra los elementos que ha contado hasta ahora, pero no se va actualizando. Traté de hacer un For hacia atrás en el botón eliminar, aplicandolo de la misma forma como hice el contar los items ingresados, pero no muestra nada.
Código del Botón ingresar:
Código:
ListBox1.Items.Add(TextBox1.Text) TextBox1.Text = "" Button2.Enabled = True For i = 1 To ListBox1.Items.Count Label2.Text = "Elementos: " & i & "" Next
Código:
Dim a As Integer If ListBox1.Items.Count = 0 Then ElseIf ListBox1.SelectedIndex <> -1 Then ListBox1.Items.RemoveAt(ListBox1.SelectedIndex) For a = ListBox1.Items.Count To 1 Step -1 Label2.Text = "Elementos: " & a & "" Next End If