VB2008Express版にて　Console.WriteLine　の文字列を　TextBoxへ表示させたいのですが、
cStr()を使ってもString型へ変更が出来ません。
文字列にしてTextBoxへ出力する方法をご存知の方ご教授願います。
VB6環境でのシリアル通信・GP-IB通信ソフトの経験はありますが、
.NET・LANのプログラムは初めてです。


目的はPingが通ったIPアドレスの一覧を取得することです。
具体的なコードは、テキストボックスを1つ貼り付けて下記となります。


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'テキストボックスの初期設定
        With TextBox1
            .Multiline = True
            .ScrollBars = ScrollBars.Vertical
        End With

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'Pingオブジェクトの作成
        Dim p As New System.Net.NetworkInformation.Ping()
        Dim xxx As Integer

        For xxx = 0 To 255
            Dim reply As System.Net.NetworkInformation.PingReply = p.Send("192.168.1." & xxx)

            '結果を取得
            If reply.Status = System.Net.NetworkInformation.IPStatus.Success Then
                Console.WriteLine("Reply from {0}:bytes={1} time={2}ms TTL={3}", _
                   reply.Address, reply.Buffer.Length, _
                    reply.RoundtripTime, reply.Options.Ttl)
                'テキストボックスへPingが通ったIPを表示させる。
                TextBox1.Text = TextBox1.Text & vbCrLf & CStr(reply.Address) & TextBox1.Text & vbCrLf
            Else
                Console.WriteLine("Ping送信に失敗。({0})", reply.Status)
            End If
        Next xxx
        p.Dispose()

    End Sub

> VB2008Express版にて　Console.WriteLine　の文字列を　TextBoxへ表示させたいのですが、
書式指定のために、String.Format メソッドを利用することで解決できると思います。

> TextBox1.Text = TextBox1.Text & vbCrLf &
Text プロパティを連結していくのではなく、
AppendText メソッドで追記していくようにしてください。

魔界の仮面弁士 様

AppendText メソッド　と　String.Format メソッド　にて、
無事にTextBoxへ　文字列を取得できました。

ありがとうございました。