VB 6 - Força Gravitacional


Um programa feito na linguagem VB6 que permite simular ação da força gravitacional.

Do ponto de vista prático, a atração gravitacional da Terra confere peso aos objetos e faz com que caiam ao chão quando são soltos no ar (como a atração é mútua, a Terra também se move em direção aos objetos, mas apenas por uma ínfima fração). Ademais, a gravitação é o motivo pelo qual a Terra, o Sol e outros corpos celestiais existem: sem ela, a matéria não se teria aglutinado para formar aqueles corpos e a vida como a entendemos não teria surgido. A gravidade também é responsável por manter a Terra e os outros planetas em suas respectivas órbitas em torno do Sol e a Lua em órbita em volta da Terra, bem como pela formação das marés e por muitos outros fenômenos naturais. (http://pt.wikipedia.org/wiki/Gravidade)

O programa usa a classe BALL.cls para simular o movimento sob ação da força gravitacional.

Para relaxar...

Simples e funcional como só o Visual Basic 6  consegue ser...

Eu sei é apenas Visual Basic mas eu gosto...

Veja os Destaques e novidades do SUPER CD VB 2013 (sempre atualizado) : clique e confira !

Quer migrar para o VB .NET ?

Veja mais sistemas completos para a plataforma .NET no Super DVD .NET , confira...

Quer aprender C# ??

Chegou o Super DVD C# 2013 com exclusivo material de suporte e vídeo aulas com curso básico sobre C#.

Pegue o projeto completo aqui: ForcaGravidadeVB6.zip

Mar 2:18 Ora, os discípulos de João e os fariseus estavam jejuando; e foram perguntar-lhe: Por que jejuam os discípulos de João e os dos fariseus, mas os teus discípulos não jejuam?

Mar 2:19 Respondeu-lhes Jesus: Podem, porventura, jejuar os convidados às núpcias, enquanto está com eles o noivo? Enquanto têm consigo o noivo não podem jejuar;

Mar 2:20 dias virão, porém, em que lhes será tirado o noivo; nesses dias, sim hão de jejuar.

Mar 2:21 Ninguém cose remendo de pano novo em vestido velho; do contrário o remendo novo tira parte do velho, e torna-se maior a rotura.

Referências:


José Carlos Macoratti