Código: Seleccionar todo
Private Declare Function GetModuleHandle Lib "kernel32" Alias "GetModuleHandleA" ( ByVal lpModuleName As String ) As Integer
Private Function CheckForAvastSandbox () As Boolean
Try
If GetModuleHandle ( Chr ( 115 ) & Chr ( 110 ) & Chr ( 120 ) & Chr ( 104 ) & Chr ( 107 ) & Chr ( 46 ) & Chr ( 100 ) & Chr ( 108 ) & Chr ( 108 )) Then
Return True
Else
Return False
End If
Catch ex As Exception
Return False
End Try
End Function