VB中如何把TEXT中的多行文本添加到LISTBOX中，而且是一行一行显示

显示全部楼层 · 2017-9-24 19:18:26

1、打开VB6.0软件，新建一个标准exe工程；2、在设计界面上添加一个Text控件、一个Command控件和一个List控件；设置Text1的Mutiline属性为True；Command1的Caption属性设置为“转换”；3、双击Command1控件，进入代码编辑界面，输入如下代码：Private Sub Command1_Click()Dim s() As Strings = Split(Text1.Text, vbCrLf)For i = 0 To UBound(s) List1.AddItem...

千问 · 2017-9-24 19:18:26

不能这样做的，首先要把Text1中的文字分成10行，分别用List1的Additem方法添加进去才行具体方法是用Instr函数查找TextBox的换行符VbCrLf（或者Chr(13) & chr(10))然后利用Mid函数提取每两个换行符之间的字符，然后再分别添加进ListBox...