VB listbox 中如何换行

Posted 2023-04-02

在一个additem字符过多,后面的看不见了

参考技术A 不能换行。只能做的时候把控件弄长点。 参考技术B 可以参照如下地址：
为ListBox添加水平滚动条
http://www.vbzx.net/ArticleView/vbzx_Article_View_228.asp

vb listbox 如何换行？

vb listbox 如何换行？我用text1设置了多行 但是listbox中显示的内容还不是text1中显示的内容， 比如text1设置了Text1.MultiLine = True text1.ScrollBars = 2 ，第一行显示为你好吗 第二行为 我很好 但在listbox中显示就为 你好吗我很好 我希望能像text1那样显示 求高人指点!

程序中：
List1.AddItem "你好吗"
List1.AddItem "我很好"
或者在设计阶段在List1的List属性中输入：
你好吗
我很好
注意换行的时候按住Ctrl再按回车键 参考技术A 文本框内容添加到列表框：

dim a() as string
a=split(text1,vbcrlf)
for i=0 to ubound(a)
list1.additem a(i)
next 参考技术B 应该用split$函数把文本框的内容分解为几个项，赋值给一个动态数组，然后用循环语句依次添加到listbox中。
具体的代码就不给你了，这几天考试，没时间。你按照这个思路做就可以了。