form loco

Iniciado por Mego, 27 Marzo 2006, 16:20 PM

0 Miembros y 1 Visitante están viendo este tema.

Mego

A ver si me acuerdo...

Private Sub Form_MouseMove (Button As Integer, Shift As Integer, X As Single, Y As Single)
    Randomize Timer
    Form1.Top =  Int (Rnd * 8000) - 100
    Form1.Left =  Int (Rnd * 14000) -1000
End Sub


Creo que es asi,
Esto hara que cada vez que trates de poner el mouse sobre el form, este se mueva y no te deje posisionarte sobre el.

Pero me gustaria, que cada vez que pase el mouse sobre el form, saliera otro igual, y si paso el mause otra vez que saliera otro y asi sucesivamente.

no se si habra forma de hacerlo sin tener que hacer todos los form.  ose me gustaria que cada vez que pasara el mause sobre el form saliera otro y otro y otro de forma infinita.

si alguien sabe como que por favor me lo diga.

Gracias.

BenRu

No creo que un programa en visual basic puedo autogenerarse asi por la cara, creo que si se puede..pero con textbox y demas...De todas maneras, no estoy seguro.

La forma mas sencilla seria crear X form..y simplemente le das las propiedades hide y show...

Un saludo

LaN

Haz que en vez de volverse loco abra de nuevo la aplicación en posicion random. Esque no se si se puede hacer duplicate como en ActionScript jejeje salu2!

NYlOn

Poner en un Form (Form1) el siguiente codigo:

Set Fromito = New Form1
Fromito.Show


Saludos.-

ranslsad

Cita de: NYlOn en 27 Marzo 2006, 21:54 PM
Poner en un Form (Form1) el siguiente codigo:

Set Fromito = New Form1
Fromito.Show


Saludos.-

Lo probe y esta muy bueno... eso serviria para hacer bromas ;)
Gracias...

Salu2

Ranslsad