クラス内に自作のイベントを定義したい VB2005

VB2005を使っています。
クラス内に自作のイベントを定義したいのですがどうすればよいのでしょうか？

非同期のソケットから帰ってきた場合に発生させるイベントです。

System.Net.Sockets.TcpClient
System.Net.Sockets.NetworkStream

以下のようにループでなくイベントで処理させたいです。

Do
If .DataAvailable Then
　　　　　　　　　　　　...
End If
My.Application.DoEvents()
Loop

No.1 ベストアンサー 回答者： anmochi 回答日時： 2008/07/04 07:54

まず、質問だけに答えると、

Public Event DataArrival(Byval sender As Object, ByVal e As System.EventArgs)
というイベントを定義して、
イベントを発生させたいタイミングで
RaiseEvent DataArrival(Me, New System.EventArgs())
としてやればよい。Deletateキーワードなども参照のこと。

さて、これで質問の内容は網羅した訳だが・・・・、きっとすぐに次の疑問がわくだろう。
「イベントは定義したがじゃあRaiseEventって誰がいつやるの？」
残念ながら今の時点では質問内容から適切な回答を出す事ができない。