お助けくださいまし〜

TCPでの通信プログラムなんですが、プロシージャー内で全部処理するなら下記のような感じでいけますよね
これを接続と受信（送信）を別のプロシージャーで行うには、どのように書けばいいんでしょうか？
以前に自力解決したことはあるんですが、すっかり忘れてしまって思い出せません
ソースもHDDクラッシュで喪失しました。

この際だから正しいお作法も知りたいと思い質問してみました


Dim tcp As New System.Net.Sockets.TcpClient(host, port)　’接続
Dim ns As System.Net.Sockets.NetworkStream = tcp.GetStream()　’受信