Public Sub DrawingArea1_Draw()
\'dibujar los objetos que haya....
Dim aviontmp As Sprite
Dim disparo As Sprite
Dim explosion As Explode
\'dubjar elementos de la pantalla
fondo.dibuja()
For Each aviontmp In grupoAviones
aviontmp.dibuja()
Next
For Each disparo In grupoDisparosPropios
disparo.dibuja()
Next
For Each disparo In grupoDisparosEnemigos
disparo.dibuja()
Next
For Each explosion In grupoExplosiones
explosion.dibuja()
Next
End