网站建设资讯

NEWS

网站建设资讯

vb.net导出txt的简单介绍

在vb.net中如何生成一个txt文件,并且写入一个数组的值?

已测试,代码如下:

成都创新互联是一家专业的成都网站建设公司,我们专注成都网站设计、成都网站制作、外贸网站建设、网络营销、企业网站建设,买友情链接广告投放平台为企业客户提供一站式建站解决方案,能带给客户新的互联网理念。从网站结构的规划UI设计到用户体验提高,创新互联力求做到尽善尽美。

Imports System.IO '引入文本操作

Public Class Form1

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

Dim txt As String = Me.getTxt

SaveTxt(txt)

End Sub

'取得存储的文本

Private Function getTxt() As String

Dim x(0 To 10) As Integer

For i As Integer = 0 To x.Length - 1

x(i) = CInt(100 * Rnd())

Next

Dim str As String = ""

For j As Integer = 0 To x.Length - 1

str += x(j).ToString  vbCrLf

Next

Return str

End Function

'存储文本

Private Sub SaveTxt(ByVal v As String)

Dim fp As String = GetSavePath()

If String.IsNullOrEmpty(fp) = False Then

'StreamWriter

Dim Swriter As New StreamWriter(fp, False) '覆盖或新建

Swriter.WriteLine(v)

Swriter.Close()

End If

End Sub

'取得存储路径

Private WithEvents sd As New SaveFileDialog

Private Function GetSavePath() As String

sd.FileName = ""

sd.AddExtension = True

sd.DefaultExt = "txt"

sd.Filter = "TXT文件(*.txt)|*.txt"

sd.ShowDialog()

Return sd.FileName

End Function

End Class

测试截图如下。

VB.NET怎样实现导入导出文本文件

用System.IO.StreamReader类可以读各类文本文件,用System.IO.StreamWriter 类则可以写各类文本文件,从而实现导入导出文本文件功能。这两个类均支持各类编码格式(默认的是Unicode和UTF-8)。

【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文件、再从txt文件读出?

软糖来告诉你吧。

VB.net中读写文件主要使用System.IO命名空间。

① 使用 File.ReadAllText 读取

Dim s As String = System.IO.File.ReadAllText("C:\a.txt")

② 使用 StreamReader 读取,注意编码格式和写入的编码保持一致。

Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)

Dim s As String = sr.ReadToEnd()

sr.Close()

③ 使用 File.WriteAllText 写入,会覆盖同名的文件。

Dim 要写的内容 As String = ""

File.WriteAllText(文件路径, 要写的内容, System.Text.Encoding.UTF8)

④ 使用 StreamWriter 写入。

Dim sw As System.IO.StreamWriter = New System.IO.StreamWriter("C:\a.txt", False, System.Text.Encoding.UTF8)

sw.WriteLine(TextTB.Text)

sw.Close()

⑤ 使用 StreamWriter 追加写入。

将上面代码的第二个参数False改为True。

◆ 满意请采纳,谢谢 ◆

VB.net窗体设计中,如何读取.txt文件中的数据?

1、新建一个标准的VB EXE工程,只有一个Form,Form上有两个按钮:Command1和Command2。

2、双击Command1添加如下代码

Private Sub Command1_Click()

Dim strFile     As String

Dim intFile     As Integer

Dim strData     As String

strFile = "c:\学生成绩.txt"

intFile = FreeFile

Open strFile For Input As intFile

strData = StrConv(InputB(FileLen(strFile), intFile), vbUnicode)

Debug.Print strData

Close intFile

End Sub

3、按F8开始单步调试代码,点击Command1,进入单步调试功能,

4、多次按下F8或直接按下F5运行完成,就完成了读取文本文件内容并输出到立即窗口。


分享标题:vb.net导出txt的简单介绍
网站地址:http://njwzjz.com/article/dseddop.html