LISTAS - LISTBOX()

Data de publicação: Dec 07, 2012 9:5:56 AM

PROGRAMA 11 - LISTAS 1

Contar items da Listbox:

‘ botão contar

conta = ListBox1.Items.Count()

MsgBox("Existem " & conta & “ nomes”)

Eventos do programa:

1º Ao clicar no botão INSERIR NOME deve surgir uma InputBox para escrever o nome e depois adiciona-lo à ListBox;

2º Ao clicar no botão LIMPAR NOMES deve limpar todos os nome da ListBox;

3º Ao clicar no botão CONTAR deve surgir uma MsgBox com o número de nomes inseridos na ListBox.

PROGRAMA 12 - LISTAS 2

Remover items selecionados da Listbox:

‘ Botão Remover

nome = ListBox1.SelectedItem

ListBox1.Items.Remove (nome)

Mostrar o nome do items selecionado da Listbox numa Label:

‘ Mostrar o nome na Label

nome = ListBox1.SelectedItem

Label3.Text = nome

Eventos do programa:

1º Ao clicar no botão INSERIR NOME deve surgir uma InputBox para escrever o nome e depois adiciona-lo à ListBox;

2º Ao clicar num dos nomes da ListBox este deve surgir escrito na Label abaixo;

3º Ao clicar no botão REMOVER NOME deve apagar da ListBox o nome selecionado.

PROGRAMA 13 - LOJA DE VESTUÁRIO

Contar items da Listbox:

‘ Botão Contar

conta= ListBox1.Items.Count()

Label2.text = Conta

Limpar items da Listbox:

‘ Botão Limpar Produtos

ListBox1.Items.Clear()