vb如何将text文本中的内容输入到数组里去？

来源：百度知道 编辑：UC知道 时间：2024/07/07 08:07:04
比如我创建一个控件text1，数组a(),想要把用户输入到特text1中的内容输入到a（）中该怎么写代码？急，详细解说的更好，给追加分！！
二楼的大虾你的代码在VB上我运行出错阿，你调试过了吗？一楼的纯属害人```

楼上的做人要厚道啊

dim a() as string
redim a(len(text1.text)-1) as string
for i=0 to len(text1.text)-1
a(i)=mid(text1.text,i+1,1)
next

补充:不知道你是不是用VB调试的,是不是忘了添加控件,我在知道里的回答绝对是先调试后回答的,如果还是不行,你把下边的******中间的代码复制到文本文件并改名为form1.frm,在代码里加了把a()打印出来的代码
********************************************************

VERSION 5.00
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 3090
ClientLeft = 60
ClientTop = 450
ClientWidth = 4680
LinkTopic = "Form1"
ScaleHeight = 3090
ScaleWidth = 4680
StartUpPosition = 3 '窗口缺省
Begin VB.TextBox Text1
Height = 735
Left = 720
TabIndex = 1
Text = "Text1"
Top = 1560
Width = 3135
End
Begin