Como fazer coisas saltar fora das paredes em visual basic

Criar um novo projeto, clicando em "Arquivo", "New Project".

Criar um componente oval na forma, arrastando o oval da caixa de ferramentas para o formulário. Arraste os cantos de tal forma a torná-la razoavelmente circular.

Criar um componente de timer na forma arrastando-o na caixa de ferramentas. Este componente não estará visível em tempo de execução, mas irá fornecer um serviço que "carrapatos" a cada determinado período de tempo. Estes carrapatos podem estar associados com uma função para executar tarefas rotineiras, tais como a actualização de quadro de animação.

Declara e inicializa duas variáveis ​​de velocidade por certo, clicando em seu formulário e selecionando View Code. Declare essas variáveis ​​dentro da classe de formulário, mas fora de quaisquer funções você já pode ter lá. Cole o seguinte código para fazer isso:

speed_x pública = 5
speed_y pública = 5

Os valores da velocidade em cada direção pode ser definida como qualquer coisa que você gosta e combinados de várias maneiras para alcançar diferentes ângulos de partida e velocidades. velocidades positivas ao longo do eixo-X resultará em movimento para a direita da forma, enquanto velocidades negativas ao longo do eixo X irá resultar em movimentos para a esquerda da forma. velocidades positivas ao longo do eixo Y irá resultar em movimento para as velocidades inferiores e negativos em relação ao topo.

Volte para o designer de formulário e clique duas vezes o formulário para criar um evento de carregamento do formulário. Código dentro desta função será executada sempre que o programa é criado pela primeira vez, por isso é um bom lugar para executar a inicialização para a animação bola quicando. Digite o seguinte código:

Timer1.Interval = 100
Timer1.Start ()

Isso pressupõe que você deixou seu temporizador com o nome padrão de Timer1. Caso contrário, use o nome que lhe deram. O parâmetro de intervalo é o número de milissegundos que passam entre cada quadro. Cem milésimos de segundo é, na verdade, o valor padrão, mas você pode alterá-lo para atender às suas necessidades.

Volte para o designer de formulário clicando na guia "Form Designer" e clique duas vezes o objeto de timer para criar um evento de "tick". Digite o seguinte código nele:

Se OvalShape1.Left () < 0 Then speed_x = speed_x * -1
Se OvalShape1.Right ()> Me.Width Então speed_x = speed_x * -1
Se OvalShape1.Top () < 0 Then speed_y = speed_y * -1
Se OvalShape1.Bottom ()> Me.Height Então speed_y = speed_y * -1
OvalShape1.Location = Novo System.Drawing.Point (OvalShape1.Left () + speed_x, OvalShape1.Top () + speed_y)