[2008] How to adjust screen brightness?

[sbasak]

Can anyone help me converting the C# to VB.NET?

        static void SetBrightness(byte targetBrightness)
        {
            //define scope (namespace)
            System.Management.ManagementScope x = new System.Management.ManagementScope("root\\WMI");

            //define query
            System.Management.SelectQuery q = new System.Management.SelectQuery("WmiMonitorBrightnessMethods");

            //output current brightness
            System.Management.ManagementObjectSearcher mox = new System.Management.ManagementObjectSearcher(x, q);

            System.Management.ManagementObjectCollection mok = mox.Get();

            foreach (System.Management.ManagementObject o in mok)
            {
                o.InvokeMethod("WmiSetBrightness", new Object[] { UInt32.MaxValue, targetBrightness }); //note the reversed order - won't work otherwise!
                break; //only work on the first object
            }

            mox.Dispose();
            mok.Dispose();
        }

My VB code looks like this - but not working Giving me error in InvokeMethod call. Second argument should be an array but I can't figure out how.

    Public Sub SetBrightness(ByVal v As Integer)
        Dim curBrightness As Integer = 0
        Dim x As New System.Management.ManagementScope("root\WMI")
        Dim q As New System.Management.SelectQuery("WmiMonitorBrightness")
        Dim mox As New System.Management.ManagementObjectSearcher(x, q)
        Dim mok As System.Management.ManagementObjectCollection
        Dim o As System.Management.ManagementObject
        mok = mox.Get()

        Dim p As Byte
        p = v.Parse(Int(v))

        For Each o In mok
            o.InvokeMethod("WmiSetBrightness", p)
            Exit For
        Next

        mox.Dispose()
        mok.Dispose()

    End Sub

Can't really understand how to pass the value of brightness in my Sub procedure. The C# code seem to pass as byte instead of number.