Aula 6 - Mod 15 - Projeto 5 calculo de media/nota minima

 Design ( Componentes )
6x        Legendas        Lbl1 Lbl2 LblMedia
6x        CaixaTexto     txtB1 txtB2 txtMedia txtNm
1x        Botão              BtnCalcular

b1
b2
b3
b4
Media
Nota

media = ( b1 *1 + b2 *2 + b3 *3 + b4 *4 )  /10
nota = (50 - ( b1 *1 + b2 *2 + b3 *3 ) /4

Modulo 5

Calcular o IMC ( acabou a luz 💪 )

Aula 4 - Mod 3 - App inventor - Projeto 3 - Farenheit para Celsius

 3x Legendas Lblnome LlFarenheit LblCelsius LblResultado

3x CaixaTexto TxtNome TxtFarenheit TxtCelsius TxtRCelsius

1x Botão BtnNome BtnConverter 

Variáveis 
f
c
c = (5/9) * (f - 32 ) 

if ( c < 20 )
''Dia frio''
if (c>20)
''Dia Agradável''
else
''Dia Quente''

Aula 3 Modulo 12

 Álcool x Gasolina (comando de decisão)

3x CaixaTexto     TxtNome

3x Legenda         LblNome

1 Botão                BtnNome

álcool 

gasolina 

fator = álcool / gasolina 

if (fator < 0.7)

   álcool 

else

   gasolina

Aula 2 - Appinventor

Módulo 11 - App Inventor - Projetor  - Cálculo  de média anual

Create Apps! ( conta google )
Projetos 
Iniciar novo projeto...
aula2_media_pin

5x    Legendas (Label)     Lb1Nome LB1B1
5x    CaixadeTexto(TextBox)    TxtNome TxtB1
1x    Botão(Button)         BtnNome BtnCalcular

media = (b1 + b2 + b3 + b4 ) / 4

http://appinventor.mit.edu/
htpps://thunkable.com/#/

Aula 1 - Modulo 10 - App Inventor - Programação para dispositivos

 App Inventor ( Android )
https:qqappinventor.mit.edu/
Create Apps! (login conta google/gmail)
Projetos / Iniciar novo projeto
Ex: aula1_app


Designer
1 Legenda (Label)
1 Botão (button)


Thunkable ( Android/IOS)
https://thunkable.com/#/
Log In ( conta Google / Apple ) 
Create new app
Ex: aula1_app

Aula 9 - Modulo 8/9 Projeto V/VI

 Projeto V
valor =  Val (Text1.Text)
taxa = Val (Text2.Text)
tempo = Val (Text3.Text)
prestação = valor + (valor * (taxa/100) * tempo)
Text4.Text = prestação

Projeto VI
vp = Val(Text5.Text)
tx = Val(Text6.Text)
meses = Val (Text7.Text)
parcela = Pmt(tx / 100,meses,-vp)
Text8.Text = parcela
Text9.Text = meses * parcela

Aula 8 - Mod 7 - Projeto IV

 1 form

4 frame

7 label

6 textbox

1 image

a = Val (Text1.Text)

b = Val (Text2.Text)

c = Val (Text3.Text)

delta = b * b - 4 * a * c

Text4.Text =  delta

x_1 = ( -b + Math.Sqr(delta)) / 2 *a

x_2 = ( -b + Math.Sqr(delta)) / 2*a

Text5.Text = x_1

Text6.Text = x_2

Aula 7 - Módulo 6 - Projeto III - Média Final

1 Form          Caption

6 Label         Caption

6 TextBox       Text

3 Command       Caption

Code: 

b1 = Val(Text1.Text)

b2 = Val(Text2.Text)

b3 = Val(Text3.Text)

b4 = Val(Text4.Text)

mfa = (b1 + b2 * 2 + b3 * 3 + b4 * 4 / 10

Text5.Text = mfa

nm = (50 - (b1 + b2 * 2 + b3 * 3)) / 4

Text6.Text = nm

mfa = (b1 * 1 + b2 * 2 + b3 * 3 + b4 * 4) / 10

Por que é dividido por 10?

Porque é soma dos pesos (ex: 1 + 2 + 3 + 4 = 10)

nm = (50 - (b1 * 1 + b2 * 2 + b3 * 3)) / 4

Aula 6 - Mod 5 - Projeto II - Cálculo

 1 form             caption

4 label              caption

4 textbox           text

3 command       caption

*Code "Calcular IMC"***

peso=Val(Text1.Text)

altura=Val(Text1.Text)

imc=peso/(altura*altura)

Text3.Tex=imc

If imc<18.5 Then

(Text4.Text)= Abaixo do peso

Elself imc="Peso normal

Else imc>=25= Acima do peso

Else Text4.Text= Obesidade

End If

Aula 5 // projeto 1

 Fahrenheit para Celsius 

1 Form                   Caption

1 Frame                 Caption

3 Label                  Caption 

3 TextBox              Text

3 Command          Caption

f = Val (Text1 . Text)

c = (5/9) * (f - 32)

Text2 . Text = c

If c < 20 Then

     Text3 . Text = “Dia frio”

ElseIf c >= 20 And c <= 23 Then

     Text3 . Text = “Dia agradável”

Else

      Text3 . Text = “Dia quente” 

End If

Aula 4

 A condicional If... Then... Else

=          igual

<>       diferente

>         maior que

<         menor que

>=       maior ou igual

<=       menor ou igual

If <condição> Then

              true

Else 

              false

End If

Aula 3

 AULA 3 

Módulo 02 - Variáveis de memória

1 Form

5 Caixa de texto

2 Botões

Propiedades

Form                Caption: Calculando média

TextBox           Text:

Command1      Caption: Calcular

Command2      Caption: Limpar

Modo código:

n1 = Val(Text1.Text)

n2 = Val(Text2.Text)

n3 = Val(Text3.Text)

n4 = Val(Text4.Text)

mf = (n1+n2+n3+n4) / 4

Text5.Text = mf

Aula 2

 Visual basic

Instalação:

Countéudo Acadêmico/Informática/Downloads

VB5 CCE (Control Creation Edition)

(Botão Direito/Mais/Executar como Administrador)

Módulo 1 - O ambiente de trabalho do Visual Basic

menu ''File/ New Project/ Stardard EXE''

Janelas (Windows)

ToolBox

Form

Project

Properties (F4)                                                         Propiedades

Ferramentas                                                             Caption: Meu programa 

Form

TextBox

Command Button