PCからPICへのデータ送信について

VB2010をのserialport機能を用いて,外部機器にデータを送るプログラムを作成しています。
外部機器から送信されてきたデータの受信は問題なくできましたが,PCからの送信がうまく出来ません。

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

If TextBox2.Text.Length = 0 Then
MessageBox.Show("送信文字列を入力してください", "エラー", MessageBoxButtons.OK, MessageBoxIcon.Error)
TextBox2.Focus()
Exit Sub
End If
Try
SerialPort1.WriteLine(TextBox2.Text)

Catch ex As Exception
MessageBox.Show(ex.Message, "エラー", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try

End Sub

プログラムは上記のようになります。(microsoftのサンプルそのままです。）
上記のプログラムで 数字の「1」を送信したいのですが,うまく送ることができません。
外部機器は,データが送信されたことは感知していますが,　「1」 が送られたことは認識できていないようです。
serialdebug2というソフトを使用して,「1」 を送信した場合は,問題ありませんでした。
　ほかのサイトでも質問させてもらい,VBの文字コードを変換するようにとのアドバイスを頂き,実行しましたが,うまくデータが送信できませんでした。
どうすれば,上記のような問題を解決できるでしょうか?