Invoke Code - VB Issue

I’ve just copy your code above. it was not occurring an error.