public enum JOBOBJECTINFOCLASS

Public Enum JOBOBJECTINFOCLASS

   JOBOBJECTINFOCLASS JobObjectInfoClass, IntPtr lpJobObjectInfo,

Private Shared Function SetInformationJobObject(hJob As IntPtr, JobObjectInfoClass As JOBOBJECTINFOCLASS, lpJobObjectInfo As IntPtr, cbJobObjectInfoLength As UInteger) As Boolean

JOBOBJECTINFOCLASS

Dim intreturn As Integer = SetInformationJobObject(j_handle, JOBOBJECTINFOCLASS.BasicLimitInformation, basicInfoPtr, CUInt(length))

If Not SetInformationJobObject(j_handle, JOBOBJECTINFOCLASS.BasicLimitInformation, basicInfoPtr, CUInt(length)) Then