Trabalhando com Estruturas de repetição - For / While

Tipo Projeto:	Aplicação Windows
Nome do Projeto:	Repeticao
Local do Projeto:	c:\aulasvbnet
Criar subDiretorio do projeto	Marcado
Criar Diretorio para os fontes	Desmarcado

Exemplo: vamos criar um exemplo usando a instrução (comando) for.

Crie o projeto acima e coloque os seguintes objetos no mesmo:

Objetos	Propriedade = Valor
Form	Name = frmPrincipal Text = Exemplo FOR
Button	Name = btnIniciar Text = Iniciar
ListBox	Name = lstLista Text =

No evento Clique do botão Iniciar Coloque o seguinte código:

Dim i As Integer
lstlista.Items.clear() ' Limpa a lista

For i = 1 To 10
      ' Monta a linha de detalhe
      lstLista.Items.add(i.ToString & " X 3 = " & (i*3.ToString ))
Next

Observe que você pode montar uma string (conteúdo alfa numérico) usando o & para conectar duas strings.
por exemplo:

var1 = "Ola "
var2 = "Mundo...!"

var1 & var2 vai ter como conteúdo: Ola Mundo...!

---------- O mesmo exemplo usando a instrução While-------------

Dim i As Integer
lstlista.Items.clear() ' Limpa a lista

While i <= 10
       ' Monta a linha de detalhe
       lstLista.Items.add(i.ToString & " X 3 = " & (i*3.ToString ))

       i = i + 1 ' isso é conhecido em programação como contador
End While

Exercícios:

1) Faça um programa que mostre todos os números pares entre 7 e 46, use For

2) Altere o programa acima para mostrar também a soma total desses valores.

3) Faça um programa que mostre todas as tabuadas do 1 ao 10.

| Indice de Aulas

Dicas : Faça os exercícios propostos.

© 1999-2009 POWER Informática - Rua João Manoel, 912 - Centro - Santana do Livramento - RS
Fones: (55) 3 2 4 2 - 5 4 2 7 / (55) 9 9 9 4 - 8 7 8 2
Serviços Manutenção Hardware, programação, páginas Web