[Vb.net] Leggere e modificare la velocità del mouse

[nandoar]

salve a tutti ho un problema relativo ad un programma devo riuscire a leggere la velocita del mouse e poi settare a piacere il parametro velocita del mouse sto lavorando in visual studio 2010.
Vi posto il codice che sto utilizzando dato che fino ad adesso riesco a settare la velocità del mouse l'unica parte che nn lavora è quella di leggere la velocità corrente


Nel modulo

Module Module1
    Public Declare Auto Function SystemParametersInfo Lib "user32.dll" (ByVal uiAction As Integer, ByVal uiParam As Integer, ByVal pvParam As IntPtr, ByVal WinIni As Integer) As Boolean

    Public Const SPI_GETMOUSESPEED = &H70
    Public Const SPI_SETMOUSESPEED = 113
      
End Module

Nel Form.load

        Dim Speed As Integer
        SystemParametersInfo(SPI_GETMOUSESPEED, 0, Speed, 0)  ' questa parte non funziona 
        MsgBox("Velocita del mouse:" & Speed)
        Speed = 10
        SystemParametersInfo(SPI_SETMOUSESPEED, 0, Speed, 0)
        MsgBox("Velocita del mouse:" & Speed)

Grazie a tutti ragazzi e buona domenica