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

質問

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

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

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

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

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

回答No.1

anmochi · ベストアンサー

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

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