VB.net 中一个form中有多个textbox,怎样把输入的数据按顺序保存到txt文件中并能打开文件
就如图,在每个textbox输入一个数,点保存后能够按顺序保存到txt文件中,在主界面打开文件时能够打开,急求高人,急~~~...
就如图,在每个textbox输入一个数,点保存后能够按顺序保存到txt文件中,在主界面打开文件时能够打开,急求高人,急~~~
展开
展开全部
System.IO.File.WriteAllText("C:\文件保存路径\我的文件.txt", TextBox1.Text & vbNewLine & TextBox2.Text & vbNewLine & TextBox3.Text & vbNewLine & TextBox4.Text & vbNewLine & TextBox5.Text & vbNewLine & TextBox6.Text)
如果要加上标签的话,就在textbox1.text的前面加上label1.text
label1.text & TextBox1.Text & vbNewLine & label2.text & TextBox2.Text 。。。。 以此类推
如果要加上标签的话,就在textbox1.text的前面加上label1.text
label1.text & TextBox1.Text & vbNewLine & label2.text & TextBox2.Text 。。。。 以此类推
追问
麻烦您能不能把完整一点的程序代码写一下,因为我是新手,麻烦了,谢了~~
追答
刚写好的说...
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim filename As String = "D:\test.txt"
Dim fs As FileStream
Dim st As StreamWriter
Try
fs = New FileStream(filename, FileMode.Append, FileAccess.Write)
st = New StreamWriter(fs)
st.WriteLine(TextBox1.Text & "------" & TextBox2.Text & "-----" & TextBox3.Text & " ------ " & TextBox4.Text + vbCrLf)‘vbCrlf表示换行 你可以根据你自己的要求来排版
st.Flush()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Dim filename As String = "D:\test.txt"
Dim fs As FileStream
Dim st As StreamWriter
Try
fs = New FileStream(filename, FileMode.Append, FileAccess.Write)
st = New StreamWriter(fs)
st.WriteLine(TextBox1.Text & "------" & TextBox2.Text & "-----" & TextBox3.Text & " ------ " & TextBox4.Text + vbCrLf)‘vbCrlf表示换行 你可以根据你自己的要求来排版
st.Flush()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
追问
再请教一下,为什么运行不了呢~输入数据后点保存没有任何反应的。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询