Foro de elhacker.net

Holaa otra vez jaja,

tengo una pregunta muuuy estupida,
hace bastante habia hecho un programa con el mouse move, pero borre el proycto cuando tube que formatear, y no me acuerdo como se usa :S

lo que necesito es muy simple, cuando muevo el mouse, que el label1 se setee en "Hola" , por ejemplo...

No me acuerdo como se usa ! :S

Alguien me refresca la memoria? xD

P.D: Estoy buscando...  ;-) :silbar:

En un control (ej: Form1)

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Me.Cls
    Me.Print X, Y
End Sub

O si quieres en general con un hook quedaría genial

DoEvents! :P

Gracias frog, ya lo habia solucionado, es facil  ;-) ;-) ;-)

Una pregunta, no se si crear otro th les va a molestar, asi que pregunto aca:

yo tengo un checkbox, que por ejemplo, hace X cosa.... pero donde iria el codigo?

Osea, a donde iria el if ? en el codigo de check o donde?

Hace rato no uso vb6

en el evento Click, y te fijas si el value es vbChecked :)

Exacto raul

Private Sub Check1_Click()
    If Check1.Value = vbChecked Then
        MsgBox "Hola"
    Else
        MsgBox "Adios"
    End If
End Sub

Por favor: no preguntes cosas que se puedan buscar fácilmente en Google. :¬¬
Lee manuales y busca mucho antes de preguntar. ;)

DoEvents! :P

Gracias a los 2! Pasa que si no puedo con algo, sigo con otra parte... ya casi termino jajajajaj  ::)

Solo que... El timer no me deja hacer 5 minutos  :¬¬

Podria hacer un timer, que cuando termine se desactive y active el timer 2, y asi sucesivamente... pero hace mucho lei que los timer usan mas recorsos(Memoria).. Es verdad?
O sino, como podria hacer?
Graaacias!

¿Para qué quieres el timer de 5 mins?
jajajajajaj  :laugh:
No hagas eso de enlazar timers... :xD
¿Cual es tu propósito?

DoEvents! :P

Ejecutar una funcion cada 5 minutos

No, los timers no gastan muuucha memoria que digamos, si quieres hacer un timer de 5 minutos, lo puedes poner cada minuto (60000 milisegundos) y un contador hasta 5, algo asi

dim i as integer
Private Sub Timer1_Tick()
   i = i + 1
   if i = 5 then ' 5 min
   end if
end sub
 

Y listo, usa la logica :P

mmmmmmmmmmmm, quede trabado en otra parte, ahora me dice "Type mismatch", en esta palabra:

Dim Linea As Line
Open config For Input As #1
Line Input #1, Linea

pero solo me pasa en un form, en el otro form2, anda perfecto! :S

 :xD
As Line?

Dim Linea As String
Open config For Input As #1
Line Input #1, Linea

Insisto, preguntar con cada problema que tengas no es productivo para nadie.
http://www.elguille.info/vb/cursos_vb/BASICO/indice.htm
Lee manuales

DoEvents! :P

Mil gracias :D