代入するには?

解決

でだ 2001-10-13 22:47:06 No: 103661

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

Bit 2001-10-15 16:21:34 No: 103662

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

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