vb.net中，讀取和寫(xiě)入文件

寫(xiě)入：Dim sr As New IO.StreamWriter(Application.StartupPath "/寫(xiě)入的文本.txt")

創(chuàng)新互聯(lián)公司是專(zhuān)業(yè)的碾子山網(wǎng)站建設(shè)公司，碾子山接單;提供成都網(wǎng)站制作、成都做網(wǎng)站,網(wǎng)頁(yè)設(shè)計(jì),網(wǎng)站設(shè)計(jì),建網(wǎng)站,PHP網(wǎng)站建設(shè)等專(zhuān)業(yè)做網(wǎng)站服務(wù);采用PHP框架,可快速的進(jìn)行碾子山網(wǎng)站開(kāi)發(fā)網(wǎng)頁(yè)制作和功能擴(kuò)展;專(zhuān)業(yè)做搜索引擎喜愛(ài)的網(wǎng)站,專(zhuān)業(yè)的做網(wǎng)站團(tuán)隊(duì),希望更多企業(yè)前來(lái)合作!

sr.WriteLine("寫(xiě)入的內(nèi)容") sr.Close()讀取：If (File.Exists(Application.StartupPath "/msg.txt")) Then

Dim fm As New IO.FileStream(Application.StartupPath "/讀取的文本.txt", FileMode.Open)

Dim sr As IO.StreamReader = New IO.StreamReader(fm)

Do While sr.Peek() = 0

TextBox1.Text = sr.ReadLine() （讀取文本到文本框）

Loop end if

vb.net中如何新建文本文檔，并向其中寫(xiě)入字符？

按你說(shuō)的方式，需要用到鉤子

建議你用File類(lèi)進(jìn)行操作，保存為T(mén)XT文件

祝好運(yùn)，望采納

如何用vb.net編寫(xiě)讀取txt內(nèi)容的代碼？

窗體上添加2個(gè)文本框，設(shè)置成多行，2個(gè)按鈕，在文本框1里隨便輸入若干文字，可以多行，單擊按鈕1，保存到文件。然后單擊按鈕2，把剛才寫(xiě)入的文件讀到文本框2里。

代碼如下：

'寫(xiě)文本文件

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

'創(chuàng)建(寫(xiě)入)一個(gè)文本文件

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

'讀取一個(gè)文本文件

Dim MyReader As New System.IO.StreamReader(Application.StartupPath "\Ssk.txt", System.Text.Encoding.UTF8)

TextBox2.Text = MyReader.ReadToEnd()

MyReader.Close()

End Sub

氣斜射入水或其他介質(zhì)，折射光線與入射光線法線在

vb.net為什么調(diào)用函數(shù)后寫(xiě)入的文本文檔是 非數(shù)字

計(jì)算溢出

1檢查寫(xiě)入前是否對(duì)變量進(jìn)行了計(jì)算操作+=*/等，如果是：

（1）檢查除數(shù)與被除數(shù)是不是至少有一個(gè)不是數(shù)字，例如空值，文字，等

（2）檢查除數(shù)是否為0

2聲明的是數(shù)字型變量，存儲(chǔ)并寫(xiě)入了文本型數(shù)據(jù)（這種情況通常會(huì)報(bào)錯(cuò)，提示類(lèi)型不能轉(zhuǎn)換）

如何在VB中建立word文檔，并寫(xiě)入文字和圖片？

首先說(shuō)明，你這樣是寫(xiě)TXT，不是DOC，雖然Word可以打開(kāi)，但根本就不是Word文件。當(dāng)然不能存儲(chǔ)圖片了。請(qǐng)參考我以下的代碼。建一個(gè)Command1。

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

Dim

ap

As

Word.Application,

doc

As

Document

Private

Sub

Form_Load()

'這個(gè)過(guò)程不必做修改，是建立一個(gè)新的Word文檔

Set

ap

=

CreateObject("word.application")

ap.Visible

=

True

Set

doc

=

ap.Documents.Add

End

Sub

Private

Sub

Command1_Click()

doc.Content.InsertAfter

Text:="請(qǐng)輸入你要輸入的內(nèi)容"

'插入文字，請(qǐng)使用這種格式

doc.Shapes.AddPicture

FileName:="D:\a.jpg"

'插入圖片，請(qǐng)使用這種格式，路徑自己寫(xiě)

End

Sub

其他問(wèn)題再找我。

vb.net 中對(duì)txt文件的讀取、寫(xiě)入的方法！始終保持txt里面只有一行！

Public Class Form1

Private Sub 寫(xiě)入文件_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 寫(xiě)入文件.Click

FileOpen(1, "D:\一行文件.txt", OpenMode.Output) ' Open file for output.

WriteLine(1, "想只保留文件為一行 那你就寫(xiě)一行好了") ' Print blank line to file.

FileClose(1) ' Close file.

End Sub

Private Sub 讀取文件_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 讀取文件.Click

Dim TextLine As String

FileOpen(1, "D:\一行文件.txt", OpenMode.Input) ' Open file for output.

TextLine = LineInput(1) '讀取一行就了

MsgBox(TextLine)

FileClose(1)

End Sub

End Class

最簡(jiǎn)單的方法 還有很多方法 自己研究吧親 希望能幫到你