Imprimir página | Cerrar ventana

Cambiar foto en vba

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=86568
Fecha de impresión: 29/Marzo/2024 a las 12:36


Tema: Cambiar foto en vba
Publicado por: Alexleal__01
Asunto: Cambiar foto en vba
Fecha de publicación: 21/Enero/2023 a las 20:30
Buenas, estoy haciendo un pequeño videojuego de piedra papel tijeras, por ahora tengo las 3 opciones y al hacer click en esas te sale la opcion en foto, pero quiero que en el intervalo que pones la opcion y sale el resultado haga una animacion de agitar la mano pero no se como hacerlo


using Piedra_Papel_Tijeras.Properties;
using System.Security.Policy;

namespace Piedra_Papel_Tijeras
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void PBPiedra_Click(object sender, EventArgs e)
        {
            PBPlayer.Image = PBPiedra.Image;
           
        }

        private void PBPapel_Click(object sender, EventArgs e)
        {
            PBPlayer.Image = PBPapel.Image;
        }

        private void PBTijeras_Click(object sender, EventArgs e)
        {
            PBPlayer.Image = 
            PBPlayer.Image = PBTijeras.Image;
        }

        private void PBPlayer_Click(object sender, EventArgs e)
        {

        }

        private void pictureBox1_Click(object sender, EventArgs e)
        {

        }
    }
}






Respuestas:
Publicado por: xavi
Fecha de publicación: 22/Enero/2023 a las 09:32
Hola,

Varias cosas.

1. Eso no tiene pinta de VBA
2. Se supone que utilizas Access (aunque ese código no lo parezca)
3. Las animaciones son "complicadas" en VBA. Opciones:
3.1 Te peleas con varias imagenes y un timer 
3.2. Utilizas un GIF que requiere alguna libreria externa

Un saludo


-------------
Xavi, un minyó de Terrassa

http://www.llodax.com" rel="nofollow - Mi web


Publicado por: Mihura
Fecha de publicación: 22/Enero/2023 a las 09:34
Como se les ocurra poner { } en VBA me retiro al Tibet a hacer vida contemplativa Ouch.

-------------
Jesús Mansilla Castells.
Saludos desde Móstoles.

http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones
http://www.tecsys.es" rel="nofollow - Tecsys.es


Publicado por: JuanW
Fecha de publicación: 23/Enero/2023 a las 10:33
LOLLOLLOLLOLLOLLOLLOLLOLLOL


Publicado por: lbauluz
Fecha de publicación: 23/Enero/2023 a las 17:47
Me da la sensación de que estás bastante perdido con el VBA, así que te voy a dar alguna indicación por si te fuese útil.

Primero añades un UserForm, en este caso userform1
Luego añades un elemento Image, en este caso image1

Con el siguiente código, cargas la imagen

UserForm1.Image1.Picture = LoadPicture("D:\tmp\stop.bmp") 
UserForm1.Image1.PictureSizeMode = fmPictureSizeModeStretch


Se supone claro que el Form ya está abierto y ejecutándose, cuando ejecutes este código, se cargará la imagen stop.bmp

Para cargar otras, cambias el archivo (por ejemplo, stop1.bmp, stop2.bmp...) y tienes que poner un control de tiempo entre cada imagen o va a ir a toda velocidad.

De hecho, puedes poner 3 botones (para probar) y que cada uno cargue una imagen al pulsarlo, con eso puedes ver el efecto que tendrá antes de meterte con el timer.


Creo que con esto ya tienes para iniciar, luego si tienes más dudas puntuales, encantados de ayudarte.

Un saludo.

Luis


-------------
El Búho es un pajarraco



Imprimir página | Cerrar ventana