The first thing that sticks out is that you're not using the IsGenuine function correctly. In VB.NET it should look something like this:
Dim needsReactivate As BooleanDim isGenuine As Boolean = TurboActivate.IsGenuine(needsReactivate)
Frankly I'm surprised your compiler wasn't throwing an error at what you wrote.
Tell me if this helps.
Also, why are you checking IsGenuine() on every run of your application? That's excessive. You should do it something like every 60 or 90 days.