timesetevent内でWinsockを使うには？ (ID:126694)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Winsockを使って，サーバーからクライアント側にデータを送る プログラムはサンプルなどで作り動作を確認しました． WindowsAPIのTimesetEventを使って，一定周期ごとにデータを 生成し，それをクライアント側に送ることを考えており， サーバーのフォーム内で，以下を， tmevent = timeSetEvent(10, 1, AddressOf TimeProc, 0, 1) モジュール内で，以下を実行させるようにしています． Public Function TimeProc(ByVal IDEve 省略 ong) As Long T = T + 1 Form1.Winsock1.SendData T End Function サーバー・クライアントが接続した状態で，上記を実行すると， 実行時エラー'-2147417848(80010108)': 'SendData'メソッドは失敗しました：'IMSWinsockControl'オブジェクト となります． 以上，Winsockを使って一定間隔でデータを送る方法として本手法はマ ズいのでしょうか？他にいい方法がありますでしょうか？ なお，VBのタイマーイベントは正確ではないとのことなので， APIを利用して行いたいのです． よろしくお願いします．