Ajuda com programa simples Visual Basic
22/10/2016
0
Olá, sou novato no VB e não estou conseguindo resolver um exercício de um livro. É o seguinte:
Desenvolvi até aqui e não tentei compilar, pois tem erros. Se alguém puder ajudar, agradeço.
Faça um pequeno programa que continuamente peça um número inteiro para o usuário até que ele digite o número zero, com o qual ele deve encerrar. A cada vez que pedir um número, ele deve somar ao saldo anterior e exibir o resultado na tela. Use uma sub-rotina "soma" e uma variável declarada no escopo do módulo para acumular o valor em seu programa.
Module Module1 Sub Soma() Dim Número, Soma, Chute As Integer Número = 0 WriteLine("Digite um Número") Write.Read (Chute) Do If (Chute <> Número) Then Soma = Soma + Chute Console.WriteLine("Errado!, Soma é ", Soma) Console.ReadLine() End If Loop Until (Chute = Número) If (Chute = 0) Then Console.WriteLine("Certo! e soma é", Soma) Console.ReadLine() End If Return (Soma é Soma , soma) End Sub Sub Main() Console.WriteLine() Console.ReadLine() End Sub End Module
Desenvolvi até aqui e não tentei compilar, pois tem erros. Se alguém puder ajudar, agradeço.
Adriano Freitas
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)