网站建设资讯

NEWS

网站建设资讯

vb.net文件删除行,vbs删除文件

vb.net中,如何删除指定文本文档中的指定行的内容

Dim newfile As New List(Of String)

创新互联,专注为中小企业提供官网建设、营销型网站制作、成都响应式网站建设公司、展示型网站设计制作、成都网站设计等服务,帮助中小企业通过网站体现价值、有效益。帮助企业快速建站、解决网站建设与网站营销推广问题。

For Each line As String In System.IO.File.ReadAllLines("TextFile1.txt")

If Not line.StartsWith("3") Then newfile.Add(line)

Next

System.IO.File.WriteAllLines("TextFile1.txt", newfile)

建个集合,用System.IO.File的ReadAllLines读出所有内容,逐个判断,如果是需要的加入集合,如果是要删除的什么都不做,最后用WriteAllLines写入即可。

这里说明一下,上面那个代码是用来删除所有以3开头的文本行。

vb.net中,如何删除指定文本文档中的指定行的内容,文本中每行大约10个字以内,搜遍网络也没找到答案,谢

给你个思路,具体算法自己写吧。

1、打开文件,

2、按行读入文件内容,找到你的指定行

3、对指定行中的内容进行操作;

4、将内容再写回文件。

求vb.net删除文本文件中的第一行和最后一行

方法先按行读取,并进行筛选,然后再写回到文件。

一行一行读取文本文件的例子:

Imports System.IO

Public Class Form1

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

Dim r As New StreamReader(Application.StartupPath "\ABC.txt", System.Text.Encoding.Default) '用StreamReader打开文本文件

Dim s As String

TextBox1.Text = ""

Do While r.Peek -1 '是否到文件尾

s = r.ReadLine '从打开的文件中读取一行内容

TextBox1.Text = TextBox1.Text s vbCrLf '添加到文本框TextBox1.Text的后面并回车

Loop

r.Close() '关闭对象

End Sub

End Class

写文本文件的例子:

Imports System.IO

Public Class Form1

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

'创建FileStream对象

Dim w As New FileStream(Application.StartupPath "\ABC.txt", FileMode.Create)

'创建BinaryWriter对象

Dim b_Write As BinaryWriter = New BinaryWriter(w, System.Text.Encoding.UTF8)

b_Write.Write(TextBox1.Text)

b_Write.Close()

w.Close()

End Sub

End Class


文章名称:vb.net文件删除行,vbs删除文件
本文URL:http://njwzjz.com/article/hssshh.html