Script de programa
1 – dado o valor do lado e do comprimento de um retângulo, calcular a área e mostrar na tela, o programa ainda deverá ter um botão de limpar para que o operador possa calcular diversas áreas. Formula : área = lado * comprimento
sub calculo() resultado=" " resultado=cstr(cdbl(vlr1.value)*cdbl(vlr2.value)) vlr3.value= resultado end sub sub limpadados( ) vlr1.value=" " vlr2.value=" " vlr3.value=" " end sub
Preencha os dados abaixo Largura: Altura:  
O resultado é:
2 - digitado o valor do lado do quadrado, calcular o perímetro e mostrar na tela, o programa ainda deverá ter um botão de limpar para que o operador possa calcular diversos perímetros Formula : perímetro = lado +lado +lado + lado
sub calculo() resultado=" " resultado=cstr(cdbl(vlr1.value)+cdbl(vlr2.value)+cdbl(vlr3.value)+cdbl(vlr4.value)) vlr5.value= resultado end sub sub limpadados( ) vlr1.value=" " vlr2.value=" " vlr3.value=" " vlr4.value=" " vlr5.value=" " end sub
Preencha os dados abaixo LADO 1: LADO 2: Lado3: Lado4:
RESULTADO È :
3 - digitado o ano de nascimento da pessoa o programa deverá calcular a sua idade. O programa ainda deverá ter um botão de limpar