異なるフォームでのデータの共有をするには？

こっこ  2004-12-21 16:31:31  No: 87528  IP: [192.*.*.*]

とても初歩的な質問で申し訳ないのですが
form1でWinsockコントロールを配置して
受信データをstrdataとしているのですが、
そのデータをform1とform2と二つのformで利用
（表示）したいのですがどのようなプログラムを
書いたら良いのか教えて下さい。
よろしくお願いします。

編集 削除
適当主義者  2004-12-21 16:41:10  No: 87529  IP: [192.*.*.*]

パブリック変数を利用してみては？

'---標準モジュール---
Public pRxData As Long

'---WinSock1---
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)

    pRxData = bytesTotal

End Sub

'---Winsock2---
Private Sub ShowRxData()

    Call MsgBox(CStr(pRxData))

End Sub

こんな感じ。

編集 削除
適当主義者  2004-12-21 16:45:04  No: 87530  IP: [192.*.*.*]

コメントの[WinSock]は間違いです。
この場合は[Form]です。。

編集 削除