新聞中心
用VB.net寫TXT文件,能不能分階段保存為多個文件?
當(dāng)然能了
成都創(chuàng)新互聯(lián)專注于樺甸企業(yè)網(wǎng)站建設(shè),響應(yīng)式網(wǎng)站建設(shè),電子商務(wù)商城網(wǎng)站建設(shè)。樺甸網(wǎng)站建設(shè)公司,為樺甸等地區(qū)提供建站服務(wù)。全流程定制網(wǎng)站開發(fā),專業(yè)設(shè)計,全程項目跟蹤,成都創(chuàng)新互聯(lián)專業(yè)和態(tài)度為您提供的服務(wù)
你可以將你的內(nèi)容按行分別存儲在數(shù)組變量中
a="全部內(nèi)容"
b=split(a,vbcrlf)
b(0) 即第一行 保存文件1
b(1) 即第二行 保存文件2
b(2)-b(x) 就是剩下內(nèi)容
vb.net創(chuàng)建一個txt文本,在debug文件夾里
設(shè)計一個窗口,添加一個名為textBox1的System.Windows.Forms.TextBox,
添加一個名為button1的System.Windows.Forms.Button。
為button1的單擊事件添加如下處理函數(shù):
Sub Button1Click(sender As Object, e As EventArgs)
'f是你的文本文件的文件名
Const f As String="t.txt"
Dim sw As System.IO.StreamWriter=Nothing
Try
If Not System.IO.File.Exists(f) Then
sw=System.IO.File.CreateText(f)
Else
sw=New System.IO.StreamWriter(f,True)
End If
sw.WriteLine(textBox1.Text)
Finally
If sw IsNot Nothing Then
sw.close()
End If
End Try
End Sub
如何用vb.net編寫讀取txt內(nèi)容的代碼?
窗體上添加2個文本框,設(shè)置成多行,2個按鈕,在文本框1里隨便輸入若干文字,可以多行,單擊按鈕1,保存到文件。然后單擊按鈕2,把剛才寫入的文件讀到文本框2里。
代碼如下:
'寫文本文件
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'創(chuàng)建(寫入)一個文本文件
Dim MyStream As New System.IO.FileStream(Application.StartupPath "\Ssk.txt", System.IO.FileMode.Create)
Dim MyWriter As New System.IO.StreamWriter(MyStream, System.Text.Encoding.Default)
MyWriter.WriteLine(TextBox1.Text)
MyWriter.Flush()
MyWriter.Close()
MyStream.Close()
End Sub
'讀文本文件
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
'讀取一個文本文件
Dim MyReader As New System.IO.StreamReader(Application.StartupPath "\Ssk.txt", System.Text.Encoding.UTF8)
TextBox2.Text = MyReader.ReadToEnd()
MyReader.Close()
End Sub
氣斜射入水或其他介質(zhì),折射光線與入射光線法線在
網(wǎng)頁標(biāo)題:包含vb.net編寫txt的詞條
文章鏈接:http://fisionsoft.com.cn/article/hpdish.html