Ejemplos usando el Api de windows para Visual basic
105 - Animación de un círculo
Volver al Listado Api -
Anterior - Siguiente
Ejemplo que utiliza el Api BitBlt para realizar una simple animación
La animación se realiza dentro de un control Picture o Formulario.
A la misma se le puede especificar la velocidad X e Y, el radio del círculo,
o sea el díámetro, y el área donde se moverá
el mismo mediante las propiedades xMax e yMax.
Colocar en un Formulario los siguientes controles mas o menos como muestra
esta imagen:
Controles
- 1 - El control Picture que se muestra de color negro
se debe llamar Picture1
- 2 - Los controles Scrollbar para la velocidad X, velocidad
Y, el Radio y el grosor del controno del círculo, se llaman HScroll1,
HScroll2, HScroll3 y HScroll4 respectivamente
- 3 - El control CheckBox que dice Repetir, se llama
Check1, y sirve para que a medida que se mueve el círculo especificar
si se limpia o no el control mediante el método Cls
- 4 - El Commandbutton que dice Limpiar colocarlo con
el nombre Commnad1
- 5 - El que dice Cambiar Color, Command2, y lo que hace
es colorear el relleno del círculo con colores aleatorios.
- 6 - El Command3 es para Comenzar la animación
y el Command4 es para detenerla
- 7 - Añadir un módulo de clase. Dejarle
el nombre por defecto Class1
Primero se lista el código del formulario y luego el del módulo
de clase
Codigo fuente en el formulario:
Ahora agregar un módulo de clase llamado Class1
y pegar el siguiente código fuente:
Recursos Visual basic - Relacionados
Recursos
visual basic - Buscar - Privacidad - Copyright © 2005 - 2009 - www.recursosvisualbasic.com.ar