Oppure

Loading
07/05/11 22:49
eisterman
Salve.
L'altro giorno stavo facendo un semplice programma in grado di far apparire un messaggio sullo schermo al movimento del mouse ma...
mettendo il codice
X = MousePosition.X
Y = MousePosition.Y

Non mi inserisce il valore MousePosition.? nella variabile adiacente.
Ecco il frammento di codice interessato dall'errore logico:
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        Dim X As Integer
        Dim Y As Integer
        If Data_Attuale_OK = True Then
            If IoTuEgli = False Then
                X = MousePosition.X
                Y = MousePosition.Y
                IoTuEgli = True
            End If
            MsgBox(X & " " & Y & " " & MousePosition.X & " " & MousePosition.Y)
            Timer2.Stop()
            If X <> MousePosition.X And Y <> MousePosition.Y Then
                Timer2.Stop()
                Non_Farlo()
            End If
            Dim Temporaneo As Boolean = False
            X = MousePosition.X
            Y = MousePosition.Y
        Else
            Timer2.Stop()
        End If
    End Sub


Il timer2 ha come intervallo 100ms.

Spero che qualcuno di voi mi possa aiutare.
Ultima modifica effettuata da eisterman 08/05/11 4:42
aaa
08/05/11 1:21
Dedalux
fantasiose le varibili..
comunque se spieghi in modo chiaro cosa vuoi fare esattamente è piu facile aiutarti. A quest'ora di leggere sto codice senza senso non mi riesce...

Comunque non usare MsgBox che è obsoleto.. Usa MessageBox.Show
aaa