Addhandler

I have a problem with this code:

VB Code:

dim y as long =1
 
private sub mysub()
    dim x as new myclass()
    addhandler x.raisedevent,addressof eventdriver
 
    while y=1
        application.doevents
    end while
end sub
 
private sub eventdriver()
    y=0
end sub

I noticed that eventdriver is never fired. Why?

Because nothing is firing the event. What in myclass is suppose to fire the event?

myclass is a tcp connection class that i created. I'm sure this class works, and that it fires events.