Anti Avast 5 SandBox Example [VB5/6 / VB.NET]

[Cartman.]

So here is the Avast anti for the sandbox. We did made a program to check the module handle. Lost that bin and src. But doesn't matter was simple anyway.

VB Classic:

General / Module:

Private Declare Function GetModuleHandle Lib "kernel32" Alias "GetModuleHandleA" (ByVal lpModuleName As String) As LongDim SimpleAntiExample As Long

Function / Button or Form_Load:

'snxhk.dllPrivate Function CheckAvastSandBox() As BooleanSimpleAntiExample = GetModuleHandle(Chr(115) & Chr(110) & Chr(120) & Chr(104) & Chr(107) & Chr(46) & Chr(100) & Chr(108) & Chr(108))If SimpleAntiExample > 0 ThenEnd ' if handle is detected it will end the program.End IfEnd Function

VB.NET:

Function / Button or Form_Load:

foreach (ProcessModule procMod in Process.GetCurrentProcess().Modules)if (procMod.ModuleName == "snxhk.dll")Debug.Print("I'm sandboxed by Avast Sandbox");