VB.net 控件richtextbox.text 输出txt文本中的内容不换行

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

成都创新互联公司是一家专业提供加格达奇企业网站建设,专注与网站建设、成都网站设计、HTML5建站、小程序制作等业务。10年已为加格达奇众多企业、政府机构等服务。创新互联专业的建站公司优惠进行中。

RichTextBox1.Text = "1"  vbCrLf  "2"  vbCrLf  "3"

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim SaveFileDialog1 As New SaveFileDialog()

SaveFileDialog1.Filter = "txt files (*.txt)|*.txt"

If SaveFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then

RichTextBox1.SaveFile(SaveFileDialog1.FileName, 3)

End If

End Sub

【vb.net】怎么把text里面的内容生成一个txt文件

Dim SaveFileDialog1 As New SaveFileDialog()

'创建一个保存对话框

SaveFileDialog1.Filter = "txt files (*.txt)|*.txt"

'设置

扩展名

If SaveFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then

'如果确定保存

My.Computer.

FileSystem

.WriteAllText(SaveFileDialog1.Filename, Textbox1.Text,False)

'保存文本,False表示不追加文本，直接覆盖其内容

End If

vb.net中如何让循环每个值输出到txt，并在txt中让每行产生的循环值前加入固定的代码

把sw.writeline放在循环体里面就好了，至于每行加号码，字符串连接就行

分享题目：vb.net输出txt的简单介绍
文章出自：http://cdweb.net/article/hhdgjg.html