vb.netのプロパティの使い方について

質問

こんにちわ！

vb.netのプロパティの使い方がわからず困っています。

具体的にはTCPクライアント接続を行い、データ送信前に現在接続を行っているかチェックを行いたいです。

作ったのは↓

Public Class Form1

'ボタンを押したら
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim tcp_conect As New System.Net.Sockets.TcpClient 'ソケット作成
Dim net_stream As System.Net.Sockets.NetworkStream = Nothing 'ストリーム取得

Dim send_bytes As Byte() = {&HFF, &H0} '送信データ

tcp_conect.Connect("192.168.1.1", "2000") 'ソケット接続
net_stream = tcp_conect.GetStream() 'ソケットストリーム取得

If tcp_conect.conected = True Then 'エラーが出てしまう。
net_stream.Write(send_bytes, 0, send_bytes.Length) 'データ送信
End If

tcp_conect.Close() 'ソケット閉じる

End Sub
End Class

'プロパティ
Public Class TcpClient

Dim _conect_test As Boolean

Public ReadOnly Property Connected As Boolean
Get
Stop
Return _conect_test
End Get
End Property

End Class

これでテストをしたいのですが、プロパティが実行されません。

もしかしてプロパティの使い方がそもそも違うのかもしれないのですが、、、

アドバイスのほどよろしくお願いいたします。

ちなみに使用しているのは
windows7
Visual Studio Express 2012です。

回答No.1

yhc3594

Public ReadOnly Property Connected As Boolean内

１．Stop・・・中断します。
２．Return _conect_test・・・「_conect_test」は不定（値がセットされていません）

実際には接続成功時に「_conect_test」をｔｒｕｅにしないと完成しませんが、とりあえず
エラーとなる要因は１．２．と思われます。
「_conect_test」は初期値としてｆａｌｓｅを代入しましょう。

お礼

良く分かりませんが、解凍ありがとうございます。

補足

ということは、propartyの使い方事態は間違ってないってことですか？