特定の文字で改行して表示するには?

せと 2003-09-16 20:30:45 No: 108716 IP: [192.*.*.*]

例えば、テキストボックスに入力した"1,23,456,789・・・・・"
といった文字列を、
1
23
456
・・・・・
のように、カンマごとに改行してラベルに表示させたいのですが、
どうやったらいいのでしょうか？

ねろ 2003-09-16 21:13:06 No: 108717 IP: [192.*.*.*]

Label1.Caption = Replace(Text1.Text, ",", vbCrLf)