segunda-feira, 17 de junho de 2013

Trabalhando com Cálculos!!!!

Vamos montar um exemplo de cálculos no vb.net, onde entramos com o número de alunos de uma escola.
Depois o número de alunos do sexo masculino e depois o feminino.
Em seguida o programa deve exibir a porcentagem de cada sexo.
Monte o form como na imagem:


Vamos aos códigos:

        Dim total, masculino, feminina As Integer
        Dim porc_masculino, porc_feminina As Double
        total = InputBox("Digite o total de alunos")
        masculino = InputBox("Digite o total de alunos masculinos")
        feminina = InputBox("Digite o total de alunos femininas")
        porc_masculino = (masculino * 100) / total
        porc_feminina = (feminina * 100) / total
        MsgBox("A porcentagem de alunos masculinos é: " + CStr(porc_masculino))
        MsgBox("A porcentagem de alunos femininas é: " + CStr(porc_feminina))

No botão sair coloque:
      me.close





Nenhum comentário:

Postar um comentário