VB中怎么在窗体打印中换行?

1、打开VB6.0，新建一个工程，在窗体中添加五个命令按钮，caption分别改为“回车”、“换行”、“回车换行”、“换行回车”以及“VBCrlf”。

成都创新互联是专业的广德网站建设公司，广德接单;提供成都做网站、成都网站建设,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行广德网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

添加一个文本框，将其Text属性清空，MultiLine属性设置为True，Scrollbars属性设置为2-Vertical，将窗体Form1的caption属性改为“回车符和换行符的区别”，将界面设置成下图：

2、双击“回车”命令按钮，进入代码编辑窗口，输入如下代码：Text1.Text = 1 Chr(13) 2，如图：

3、双击“换行”命令按钮，进入代码编辑窗口，输入如下代码：Text1.Text = 1 Chr(10) 2，如图：

4、双击“回车换行”命令按钮，进入代码编辑窗口，输入如下代码：Text1.Text = 1 Chr(13) Chr(10) 2，如图：

5、双击“换行回车”命令按钮，进入代码编辑窗口，输入如下代码：Text1.Text = 1 Chr(10) + Chr(13) 2，如图：

6、双击“vbCrlf”命令按钮，进入代码编辑窗口，输入如下代码：Text1.Text = 1 vbCrLf 2，如图：

7、关闭代码窗口，按下F5运行程序，依次单击““回车”、“换行”、“回车换行”、“换行回车”以及“VBCrlf”命令按钮，在窗体中依次输出，如图：

vb.net label 换行

在要换行的地方断开字符串，用 Environment.NewLine 连接两个字符串即可。

vb text怎么设置自动换行？

1、vb6中用鼠标拖放文本框大小。

2、vb6的文本框让文本自动换行的方法是设置它的MultiLine属性为true.

3、vb6全称全称为VisualBasic 6.0，是微软公司推出的可视化编程工具MSDN之一，是目前世界上使用最广泛的程序开发工具。如果你是一个对编程一无所知，而又迫切希望掌握一种快捷实用的编程语言的初学者，那选择VB 6.0没错的。即使考虑到VB程序本身编译和运行效率较低的不足(嘻嘻速度现在不是问题吧)，单是它的快捷的开发速度，简单易学的语法，体贴便利的开发环境，它仍不失一款优秀的编程工具，是初学者的首选。

在属性栏里把multiLine选为 ture，就可以实现自动换行；

MultiLine 属性（应用于TextBox）

返回或设置一个值，该值指示 TextBox 控件是否能够接受和显示多行文本。在运行时是只读的。

语法

object.MultiLine

object 所在处代表一个对象表达式，其值是“应用于”列表中的一个对象。

设置值

MultiLine 属性设置值有：

设置值 描述

True 允许多行文本。

False （缺省值）忽略回车符并将数据限制在一行内。

vb.net中listbox内容自动换行如何实现

也不是不可以实现，只不过复杂一点而已，具体看下面代码。不过在需要换行等情况下的文本显示，还是建议用RichTextBox开启只读属性比较省心、比较合适。

Private Sub AutoNextRow()

'获取ListBox行集合文本

Dim length As Integer = (ListBox1.Items.Count - 1)

Dim items(length) As String '行文本数组

For i As Integer = 0 To length

items(i) = ListBox1.Items(i).ToString

Next

'处理ListBox换行

ListBox1.Items.Clear() '清空行内容

Using g As Graphics = Graphics.FromHwnd(ListBox1.Handle)

Dim result As New List(Of Object)

Dim w As Single = ListBox1.ClientSize.Width

Dim sf As SizeF, str As StringBuilder

For Each s As String In items

str = New StringBuilder

For i As Integer = 0 To (s.Length - 1)

sf = g.MeasureString(str.ToString  s(i), ListBox1.Font) 

If sf.Width  w Then

result.Add(str.ToString)

str = New StringBuilder

End If

str.Append(s(i))

If i = s.Length - 1 Then result.Add(str.ToString)

Next

Next

ListBox1.Items.AddRange(result.ToArray) '填充行内容

End Using

End Sub

新闻标题：vb.net文本控件换行 vba控件文字框可以换行吗
网站地址：http://ybzwz.com/article/ddoihph.html