表示テキストを保存するには

テキストボックスとボタンを貼り付けて
ボタンを押すと、　あいうえお　と表示されるプログラムを作るとします
この場合、３回ボタンをおしたら、あいうえお　が３行（または３個）表示されたり
１０回ボタンを押したら、あいうえお　が１０行（または１０個）表示するようにしたいです
いまだと何回押しても１つしか表示されません

ちなみにボタンをダブルクリックして
Buttun1 クラスの　　click　メゾットで
TextBox1.Text = ("あいうえお")

と書いただけです
これに何を追加すればいいでしょうか？

No.1 ベストアンサー 回答者： noname#67980 回答日時： 2008/05/08 11:26

TextBox1.Text = ("あいうえお")

を
TextBox1.Text = TextBox1.Text & ("あいうえお")

とやってみてはいかがでしょう。

No.4 回答者： K-Sogacchi 回答日時： 2008/05/08 15:15

横から補足失礼します。

TextBox1.Text += "あいうえお" & vbCrLf　は、
TextBox1.Text &= "あいうえお" & vbCrLf　と書くクセをつけておいた方が
後々の事を考えても、良いと思います。
文字列連結には全て「+」ではなく「&」を使う方法で。

前のソースにもこのやり方入ってたんだけどなぁ…
こっちで話を進めるなら、前のは締め切っておいてくださいね。

No.3 回答者： kikujack 回答日時： 2008/05/08 14:58

redfox63さんいったとおりです。

ちなみに下記三種類の書き方が意味同じです。
TextBox1.Text = TextBox1.Text & "あいうえお" & vbCrLf
TextBox1.Text += "あいうえお" & vbCrLf
TextBox1.Text = TextBox1.Text & "あいうえお" & Chr(13) & Chr(10)

テキストボックスのMultiLineプロパティをTRUEに変更しないと、テキストボックスが改行できません。

No.2 回答者： redfox63 回答日時： 2008/05/08 11:36

まず テクストボックスのMultiLineプロパティを Trueに変更します

コマンドボタンのClickイベントで

TextBox1.Text = TextBox1.Text & "あいうえお" & vbCrLf

と記述しましょう

前回入力されているTextBox1.Text と "あいうえお"と 改行を表す定数を連結して Textプロパティを更新します