C# と VB.NET の質問掲示板

> ByRef pvParam As UInteger
ByVal pvParam As UInteger
にして

        SystemParametersInfo(SPI_SETFOREGROUNDLOCKTIMEOUT, 0UI, 100I, 0UI)
        Dim value32 As Integer = 3456I
        Dim p1 As IntPtr = Marshal.AllocHGlobal(Marshal.SizeOf(0))
        Marshal.WriteInt32(p1, value32)
        SystemParametersInfo(SPI_GETFOREGROUNDLOCKTIMEOUT, 0UI, p1, 0UI)
        value32 = Marshal.ReadInt32(p1)
        Marshal.FreeHGlobal(p1)
        Console.WriteLine(value32)

これだと最後のvalue32には100が設定されますが、駄目でしょうか？