代入するには?

解決


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

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

編集    削除
Bit  2001-10-16 01: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-16 06:18:15  No: 103663  IP: [192.*.*.*]

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

編集    削除