La Web del Programador: Comunidad de Programadores
 
    Pregunta:  94 - SALVAPANTALLAS DE POWER POINT EN VISUAL BASIC
Autor:  Jolé
Soy un principiante en esto de la programación en Visual Basic y me han encargado que haga una especie de salvapantallas con una presentación de Power Point. La idea es que esta presentación con el visor de Power Point se vea en un ordenador como si de un salvapantallas se tratase, de forma que, cuando alguien tocase una tecla o el ratón se parase la ejecución y se viese el escritorio o la pantalla de ordenador como siempre. Hacer que se pare al tocar una tecla o el ratón no creo que sea difícil, pero no sé cómo hacer que con un Timer (al pasar 30 segundos, por ejemplo) se vuelva a cargar el salvapantallas.
¿Hay que convertirlo a .scr como los salvapantallas de Windows o hay una manera m&ás fácil?

  Respuesta:  Diego Fernando Gutierrez
bedes hacer el ejecutable .EXE y renombrarlo desde el dos a .SCR

c:\ren misalvapantallas.EXE misalvapantallas.SCR

luego colocar el archivo en la carpeta

c:\windows\system o c:\windows\system32

de esta manera el windows reconoce el nuevo protector de pantallas.

en el proyecto de visual basic debes hacer una linea de codigo.
en el form_load de el proyecto salva pantallas debes colocar:

sub form_load
if app.previnstance = true then end
end sub

app.previnstance valida si la aplicacion que esta cargando ya fue abierta, esto con el fin de que pasados los 30 segundos no se buelba a abrir.
esta linea de codigo es importante ya que el windows abre el protector tantas veces como se acabe el tiempo de espera.

espero te sirva de algo, alguna pregunta escribeme

  Respuesta:  Ramón González
Creo que la solución más sencilla es hacer un salvapantallas normal para windows, los ´.SCR´, luego es windows el que se encarga de ejecutar el salvapantallas según el tiempo que le pongas en el ´Panel de Control´.
Para hacer esto en windows 3.x solo tienes que crear un ejecutable normal en Visual Basic, pero poniendo como título de la aplicación:
SCRNSAVE : el nombre de tu salvapantallas
después cambias la extensión de tu programa, de