• Domingo 22 de Diciembre de 2024, 07:45
« anterior próximo »
Páginas: [1]

Autor Tema:  Imagenes Aleatorias  (Leído 2287 veces)

vbmc_2004

  • Miembro activo
  • **
  • Mensajes: 41
    • Ver Perfil
Imagenes Aleatorias
« en: Sábado 20 de Noviembre de 2004, 21:01 »
0
Hola de nuevo!!!

como es posible realizar que el MDIForm tenga imagenes aleatorias como fondo???

salu2
y gracias
<!--c1--></div><table border=\'0\' align=\'center\' width=\'95%\' cellpadding=\'3\' cellspacing=\'1\'><tr><td>CODE </td></tr><tr><td id=\'CODE\'><!--ec1-->[vmbc®]<!--c2--></td></tr></table><div class=\'signature\'><!--ec2-->

RadicalEd

  • Moderador
  • ******
  • Mensajes: 2430
  • Nacionalidad: co
    • Ver Perfil
Re: Imagenes Aleatorias
« Respuesta #1 en: Sábado 20 de Noviembre de 2004, 21:35 »
0
TRATA ASI CON UN Randomize
Código: Text
  1.  
  2. Private Sub MdiForm_Load() 'NO ME ACUERDO SI ES ASI
  3. On Error Resume Next
  4. Dim x
  5. Randomize
  6. x = Int(Rnd * 5) + 1
  7. MdiForm.Picture = LoadPicture (App.Path & &#34;&#092;pic&#34; & x & &#34;.ext&#34;) 'App.Path ES LA DIRECCION ACTUAL x ES EL NOMBRE CON UN NUMERO Y EXT ES LA QUE QUIERAS DE IMAGEN
  8. End Sub
  9.  
CREO QUE ES ALGO ASI.
OJALA TE SIRVA.
CHAO
El pasado son solo recuerdos, el futuro son solo sueños
Páginas: [1]
« anterior próximo »