Data de publicação: Oct 02, 2012 4:7:57 PM
Inserir item
Nome = TextBox1.Text
ListBox1.Items.Add(Nome)
Remover item selecionado
nome = ListBox1.SelectedItem
ListBox1.Items.Remove(nome)
Limpar items
ListBox1.Items.Clear()
Contar items
total = ListBox1.Items.Count
Label2.Text = total