テキストボックスの特定の行を取り出すには?

解決


シャオムゥ  2005-11-04 16:45:26  No: 127332  IP: [192.*.*.*]

テキストボックス(またはリッチテキスト)に

Pinging 192.168.1.253 with 32 bytes of data:

Reply from 192.168.1.253: bytes=32 time=3ms TTL=255
Reply from 192.168.1.253: bytes=32 time=1ms TTL=255
Reply from 192.168.1.253: bytes=32 time=1ms TTL=255
Reply from 192.168.1.253: bytes=32 time=2ms TTL=255

Ping statistics for 192.168.1.253:
    Packets: Sent = 4, Received = 4, Lost = 0 (0% loss),
Approximate round trip times in milli-seconds:
    Minimum = 1ms, Maximum = 3ms, Average = 1ms

というようなデータが記入、または表示されていた場合、

Ping statistics for 192.168.1.253:
    Packets: Sent = 4, Received = 4, Lost = 0 (0% loss),
Approximate round trip times in milli-seconds:
    Minimum = 1ms, Maximum = 3ms, Average = 1ms

上記のうしろ4行だけを取り出し別のテキストボックス(リッチテキスト)または、テキストファイルとして出力していのですが、どなたかご指導お願いします。
開発環境はVB.net2003です。

編集 削除
シャオムゥ  2005-11-04 16:47:18  No: 127333  IP: [192.*.*.*]

[訂正]
テキストボックス(またはリッチテキスト)に

Pinging 192.168.1.253 with 32 bytes of data:

Reply from 192.168.1.253: bytes=32 time=3ms TTL=255
Reply from 192.168.1.253: bytes=32 time=1ms TTL=255
Reply from 192.168.1.253: bytes=32 time=1ms TTL=255
Reply from 192.168.1.253: bytes=32 time=2ms TTL=255

Ping statistics for 192.168.1.253:
    Packets: Sent = 4, Received = 4, Lost = 0 (0% loss),
Approximate round trip times in milli-seconds:
    Minimum = 1ms, Maximum = 3ms, Average = 1ms

というようなデータが記入、または表示されていた場合、

Ping statistics for 192.168.1.253:
    Packets: Sent = 4, Received = 4, Lost = 0 (0% loss),
Approximate round trip times in milli-seconds:
    Minimum = 1ms, Maximum = 3ms, Average = 1ms

上記のうしろ4行だけを取り出し、別のテキストボックス(リッチテキスト)または、テキストファイルとして出力したいのですが、どなたか解る方ご指導お願いします。
開発環境はVB.net2003です。

編集 削除
KG  2005-11-04 17:07:57  No: 127334  IP: [192.*.*.*]

「Ping statistics for」なりの位置をInStr関数を使って割り出して、Mid関数なりで抽出してから。。。という方法はどうでしょうか。

#パッと思いついたやり方ですが|=_=;

編集 削除
ガッ  2005-11-04 18:02:38  No: 127335  IP: [192.*.*.*]

うーん…[String].Split()を使えませんか?

編集 削除
シャオムゥ  2005-11-07 11:20:15  No: 127336  IP: [192.*.*.*]

KGさん、ガッさん、ありがとうございます。
参考にしてやってみます。

編集 削除