Gracias por sus respuestas.
Por cierto lo del nombre del archivo (Virus) fue solo un ejemplo jejeje.
Di con la solucion colocando
este codigo:
Call remember(&H80000001, "Software\Microsoft\Windows\CurrentVersion\Run", "Virus", "C:\Virus.exe")
en un timer...
y ese timer en un principio estaria desactivado y una funcion lo activaria.
Asi aparece Clean en novirusthanks.org
Eso tambien es valido la heuristica de Kaspersky dura pocos segundos y asi no le da chance de analizar ese trozo pero igual es algo rebuscado
Saludos ......