代入するには?

解決

でだ 2001-10-13 22:47:06 No: 103661 IP: [192.*.*.*]

テキストボックスの文字を一文字ずつ配列に入れるにはどうしたらいいんでしょうか?

Bit 2001-10-15 16:21:34 No: 103662 IP: [192.*.*.*]

Dim A() as String
L = Len(Text1.Text)
ReDim A(L)
For i = 0 to L
A(i) = Mid(Text1.Text,i,1)
Next i
これでできると思います

でだ 2001-10-15 21:18:15 No: 103663 IP: [192.*.*.*]

ありがとうございました。
参考になりました。