1つのTextBoxに文字列を改行しながら追加 対象のTextBoxのプロパティ MultiLinesをTrueにする TextBox1.Text = TextBox1.Text & data(i) & Chr(13) & Chr(10) 「Chr(13) & Chr(10)」は改行コード