关于64Bit下的程序自我保护

大家有什么好的建议吗，谢谢。

Win8.1 x64限制超级多，函数指针都带验证的，用反常手段改掉再运行直接AccessViolation。估计别的方面也会有限制。
--来自相机+平板电脑+手机融合成的的Lumia 1520

64位无法使用32位驱动，这是很早以前就有的限制。还有模块不能互相访问。
--来自相机+平板电脑+手机融合成的的Lumia 1520

对付RtlSetProcessIsCritical
这不是vb6代码，看不懂就算了
Private Declare Function NtQueryInformationProcess Lib "ntdll" (ProcessHandle As IntPtr, ProcessInformationClass As Integer, ByRef ProcessInformation As Integer, lProcessInformationLength As Integer, ByRef lReturnLength As Integer) As Integer
Private Declare Function NtSetInformationProcess Lib "ntdll" (ProcessHandle As IntPtr, ProcessInformationClass As Integer, ByRef ProcessInformation As Integer, lProcessInformationLength As Integer) As Integer
Const ProcessBreakOnTermination = 29
Public Sub SetProcessIsNotCritical(hProcess As Integer)
If hProcess = 0 Then Throw New ArgumentException( "句柄是0")
Dim Status As Integer
Dim Enable As Integer
Status = NtQueryInformationProcess(hProcess,
ProcessBreakOnTermination,
Enable,
4,
0)
If Status <> 0 Then
Throw New componentmodel.win32Exception(Status)
End If
If Enable = 0 Then Return
Enable = 0 ‘关键。去除关键进程属性，如果是1就打开这个属性。
Status = NtSetInformationProcess(hProcess,
ProcessBreakOnTermination,
Enable,
4)
If Status <> 0 Then
Throw New componentmodel.win32Exception("操作失败，错误代码:" & Status)
End If
End Sub