vb.net 读写问题(可加分!)

来源:百度知道 编辑:UC知道 时间:2024/09/28 17:53:21
我在TEXTBOX中,写了一些内容,格式如下:

0123456789 ' 这是第一行
' 这是第二行,一个回车
ABCDEF ' 第三行
dddddddddddddddddd ' 第四行

我现在想把这四行内容,写到本地PATH中的一个TXT文件中(C:\test.txt)
默认,它会按照上面的格式(即有四行)写到C:\test.txt

但,我现在想要的写入格式是,把这四行,合为一行,写入到C:\test.txt中!

该如何实现?

如果提供的方法实现,+20分!!!
谢谢~

Textbox有一个lines属性,可以读取Textbox的每一行内容

Dim a As String = ""
Dim I As Integer

For I = 0 To TextBox1.Lines.Length - 1
a = a & TextBox1.Lines(I)
Next
My.Computer.FileSystem.WriteAllText("C:\test.txt", a, False)

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
TextBox5.Text = "1" & vbCrLf & "2" & vbCrLf & "3" & vbCrLf
End Sub

Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
Dim s() As String = Nothing
Dim sTemp As String = ""
Dim i As Integer = 0

s = Split(TextBox5.Text, vbCrLf)

For i = 0 To UBound(s)
sTemp = sTemp & s(i)
Next

MsgBox(sTemp.Replace(vbCrLf, ""))
End Sub