VB文本换行怎么做？

VB的换行符为“vbcrlf”，所以你只需要Text1Text = "再见" & vbcrlf & "我还没学好如何自动关闭按ALT+F4退出吧\\"即可。

如果你要把一个控件设为不可用，你可以在代码中加以控制。ButtonEnable = False（不但无法使用，而且鼠标也无法点上去）；ButtonReadOnly = True(无法使用，但鼠标能点上去，可以获取焦点)；ButtonVisible = False(不显示)

我本来是第一个回答的，为了把第二，三个问题也解决，修改答案后就成最下边一个了

1--------------------------------------------------------------

把Text4的MultiLine属性设置成True

复制下边的代码：

Private Sub Form_Load()

Text4Text = ""

End Sub

Private Sub Command1_Click()

Text4Text = Text4Text + Text1Text + Text2Text + Text3Text + vbCrLf

End Sub

'下边是为了保障Text4的焦点处于最后，试着去掉下边这三行，观察一下效果，你会发现这三行也很重要

Private Sub Text4_Change()

Text4SelStart = Len(Text4Text)

End Sub

2--------------------------------------------------------------

如果是用List也可以，下边就是双击复制该表项内容

Private Sub List1_DblClick()

ClipboardClear

ClipboardSetText List1List(List1ListIndex)

MsgBox "该项内容已经复制到剪贴板，请用Ctrl+V粘贴"

End Sub

3--------------------------------------------------------------

richtextbox比textbox好用，比如richtextbox还能每行字体颜色不同，显示等，不过你这里用不着它的这些复杂用法

首先点“工程”，“部件”，找到“Microsoft Rich textbox Contral 60”勾上，点“确定”，然后就可以在工具那里看到它了，在窗体上画RichTextBox1

RichTextBox1 就不用设置MultiLine了，代码的写法和用Text4差不多

复制下边的代码：

Private Sub Form_Load()

RichTextBox1 = ""

End Sub

Private Sub Command1_Click()

RichTextBox1Text = RichTextBox1Text + Text1Text + Text2Text + Text3Text + vbCrLf

End Sub

Private Sub RichTextBox1_Change()

RichTextBox1SelStart = Len(RichTextBox1Text)  '保障RichTextBox1的焦点处于最后

End Sub

上边的代码我都测试过了，完全直接可用！！ 看！

有两种方式：
1、编写代码实现换行：
LABEL1CAPTION
=
"第一行内容"
&
vbCrLf
&
"第二行内容"
'vbCrLf就是一个回车符，实现换行
2、编辑LABEL的属性，实现自动换行：
将AutoSize
设置为False,将WordWrap设置为True,,此时在CAPTION中任意输入文字，将实现自动换行
。

因为你没有把 TextBox 的 Multiline 设为 True。
默认情况下，TextBox 是单行显示的（Multiline=False），遇到换行符就会直接忽略而连接前面的字符。这样所有的东西就在一行里面了。
要解决这个问题，将 Multiline 设置为 True，ScrollBars 最好设置为2或者3。顺便说一下，记事本中的“自动换行”指的就是 ScrollBars=2 与 ScrollBars=1 的效果的区别。自己试试吧。
还可能有一种情况，就是网页本身……比如某些软件的 Manifest 就是写在一行里面。反正符合 HTML/XML 标准的描述都可以这么做。有一些网站，如 Google，源码是很挤的。这一点可以试试。据 Google 说，这是为了节省用户的网费……毕竟换行符也是算两个字符的，而一般的计费方式是以流量为标准。

在控件中是可以设置的,将multiline属性改为true可以多行显示
当multiline为真时,使用scrollbars属性可以添加滚动条!
在句末加chr(13),或vbcrlf
也可以换行

当然你也可以再输出时到该换行的时候加上 Chr(13)+Chr(10)
如果你想字符串输出文本文件时中间没有空格,那就不能用writeline了,
而要再输入前现对字符串进行处理了,或者边判断边输入文本其实对文本得每一种 *** 作方法时多样的,就看你能否想到了!

首先把text的multiline属性改为true，然后写上代码
text1text
=
"1+4"
&
vbcrlf
&
"2+3"
即可。注：vbcrlf是换行符。

---