"La mariposa sale volando por la ventana, luego se mueve hacia la parte inferior izquierda y luego vuela hacia la parte superior derecha", esta es nuestra pregunta del examen final de VB, ¡respóndela!

Hay un programa ya hecho (el proyecto completo), impulsado por el dibujo, lo quieras o no, déjalo en el buzón

Código:

Private?Sub?cmdEnd_Click () End

End?Sub

Private?Sub?Form_Load()

'Posicionamiento inicial de la esquina inferior izquierda

ImaMain Move?0、Me.Height-ImaMain.Height-305

Timer1.Enabled=True

Fin

Privado?Sub?Timer1_Timer ()

¿Estático?ImaBmp?As?Integer

ImaMain.Move?ImaMain.Left?+?20,?ImaMain.Top?-?5?'Imagen en movimiento

' A continuación se muestra una transformación de la imagen de las alas de una mariposa abriéndose y cerrándose. Implementar efectos de animación

If?ImaBmp?Then

ImaMain.Picture?=?ImaOpenWings.Picture

Else

ImaMain.Picture? =?ImaCloseWings.Picture

ImaMain.Picture?=?/p>

¿Fin?Si

ImaBmp?=?No?ImaBmp

'Determina si la mariposa sale volando por la ventana, si es así, regresa a la esquina inferior izquierda

If?ImaMain.Left?>=?Me.Width?or?ImaMain.Top?

ImaMain.Move?0,?Me.Height?-?ImaMain.Height?-?305

¿Fin?Si

¿Fin?