请问ntquerysysteminformation的5号功能

请教ntquerysysteminformation的5号功能
为了查询其它进程的工作状态，在VB里用ntquerysysteminformation的5号功能。代码如下：


Dim sysProcInfo() As Byte 'SYSTEM_PROCESS_INFORMATION

        Dim lngLen As Long

 

        Dim lngResult As Integer = NtQuerySystemInformation(5, 0&, 0&, lngLen)

        ReDim sysProcInfo(lngLen - 1)

 

        Dim status As Integer = NtQuerySystemInformation(SYSTEM_PROCESSINFORMATION, VarPtr(sysProcInfo), sysProcInfo.Length, IntPtr.Zero)

 

        If (status <> NO_ERROR) Then

            Exit Sub

        Else

                '接下来不知道怎么将byte数据转成'SYSTEM_PROCESS_INFORMATION的，再循环获取指定进程的工作状态。
        End If
请大家帮忙解决啊！！

谢谢！！

[解决办法]
谁能告诉我啊
[解决办法]
http://blog.csdn.net/oldmtn/article/details/6183878
[解决办法]
楼上这个文章我看过了，但是问题还是未能解决。