13518219792
错了，是vbCrLf Chr(13) + Chr(10)
创新互联建站成立与2013年，是专业互联网技术服务公司，拥有项目网站设计、网站制作网站策划，项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命，1280元大悟做网站,已为上家服务,为大悟各地企业和个人服务,联系电话:028-86922220
共两个字符。
#10是换行符
#13是回车符
有了回车符，代表了一行的结束，也方便于读取文本。
不要只打一个，vbCrLf简单方便，也是一个良好的习惯。
、首先选中拖至面板的
ListBox控件
，点属性，选中DrawMode,改成OwnerDrawFixed或OwnerDrawVariable
2、还是在属性工具中，切换到事件（就是那个闪电图标），鼠标双击‘行为’菜单下的DrawItem，添加一个事件。
3、在‘窗体设计器生成的代码’中就添加了一个新的事件
this.listBox1.DrawItem
+=
new
System.Windows.Forms.DrawItemEventHandler(this.listBox1_DrawItem);
4、在事件中添加代码，你自己通过文字的长度和文字的高度，计算每一列的宽度，进行设置。
给你个列子：
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles Button1.Click
注意短横线
Dim MultiString as String‘有许多行的字符串Dim StrArray() as String'字符串类型的一维数组StrArray=Split(MultiString,VbCrlf)'用换行符分割字符串
在要换行的地方断开字符串，用 Environment.NewLine 连接两个字符串即可。
假设你要分割的字符串是string1的话
分割代码就是：
dim s as string=strings.split(string1,vbcrlf)
这样s就是一个阵列了。s(0)是第一段内容，s(1)是第二段内容，以此类推。~~
googles8 的写法也对的。不过我的代码省去了声明的一行。只用一行就好了。
