请问如何在listbox 中换行显示

Posted 2023-04-02

就是我在text中打了一句英文 要把这些英文按单词显示在listbox中，每个单词显示成一行，现在已经实现了显示 ，就是没法换行，以下是我的代码
Private Sub Command1_Click()
Dim s1$, s2$, j&, tianjia$
s1 = Text1.Text
j = 1
Do
Do While Mid(s1, j, 1) <> 0 And j <= Len(s1)
s2 = s2 & Mid(s1, j, 1)
j = j + 1
Loop

List1.AddItem s2
s2 = " "
j = j + 1
Loop While j <= Len(s1)

End Sub

参考技术A 没看明白你的意思，listbox内容是不能换行的。 参考技术B 我是.net .
应该可以加<Br>

iPhone：如何在drawRect中换行？

【中文标题】iPhone：如何在drawRect中换行？

【英文标题】：iPhone: How to wrap text in drawRect?

【发布时间】：2009-05-23 05:52:06

【问题描述】：

如何在drawRect 方法中绘制环绕文本？我正在尝试使用 atebits 的 ABTableViewCell 类来自定义绘制表格视图单元格。我想画一张小图片，然后在它旁边画一个可能需要也可能不需要换行的文字。想想像 Tweetie 这样的 Twitter 客户端中的表格单元格，它显示了个人资料图片和推文。这是怎么做到的？

我尝试使用各种NSString drawAtPoint 方法，但它们似乎没有将文本换成多行。

【参考方案1】：

我认为您需要drawInRect:withFont: 方法之一。它们被记录为执行自动换行。如果你仔细想想，drawAtPoint 不起作用是有道理的，因为它不知道文本需要适应的矩形。

【讨论】：

谢谢你，n8gray。它看起来像 drawInRect:withFont:lineBreakMode:alignment: 做我所追求的。出于某种原因，许多 drawAtPoint 方法也采用 forWidth 和 lineBreakMode 参数，这就是我尝试这些方法的原因。实际上，一些 drawInRect 方法（例如 drawInRect:withFont:lineBreakMode:) 也似乎在一行中呈现文本，尽管您可能会从名称中获得印象。这让我失望了，但我想我还没有尝试过所有这些。不管怎样，你刚刚度过了我的星期六。

lineBreakMode 还控制截断（头/尾），因此也适用于单行渲染。