リッチテキストに表示するには？ (ID:126109)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 環境はVB.net２００３です。 URLをダウンロード後テキストファイルに書き込む前に すでにそのURLがテキストファイルに書き込まれてるとダブるので チェック機能を作ろうとしてます。 現時点であるURLをReadToEndで読み込んで一度リッチテキストに表示しようとしたら、一瞬だけひょうじされてすぐに消えます。 ためしにfsw.WriteLineを「’」で消して動かしてもだめでした。 一応ビルドはできます。 初心者の質問ですがよろしくお願いします。 ’urllist.txtにはすでに5個リストがある Dim fsk As FileStream = New FileStream("c:\urllist.txt", FileMode.OpenOrCreate) Dim fsr As StreamReader = New StreamReader(fsk) Dim fsw As StreamWriter = New StreamWriter(fsk) Dim fsrr As String = fsr.ReadToEnd() RichTextBox1.Text = fsrr ’ここの時点でおかしい If -1 = fsrr.IndexOf(url) Then fsw.WriteLine(url) End If ・ ・ ・ fsw.close() fsr.close()