テキストファイルの読み込みができない (ID:146366)

名前

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

本文 > TextBox1.Text += str(i) + vbCrLf > は TextBox1.AppendText(str(i) + vbCrLf) とすれば速度が向上しますよ。