Aula 2 - 1º bim

      Média Aritmética

 

 -> Iniciar um projeto e criar um formulário com 5 caixas de texto.

 -> Usando a caixa de propriedades à direita, é possível alterar o título e cor de fundo do formulário.

 -> Ir à área de código clicando 2 vezes no botão e copiar o seguinte código:

  Private Sub Command1_Click()

n1 = Val(Text1)

n2 = Val(Text2)

n3 = Val(Text3)

n4 = Val(Text4)

qtdNotas = 4

peso1 = 1

peso2 = 2

peso3 = 3

peso4 = 4

nf = (n1 . peso 1 + n2 . peso2 + n3 . peso3 + n4 . peso4)/(peso1 + peso2 + peso3 + peso4)

Text5 = nf

End Sub