vb点虐删除文本行 vb删除文件代码

VB删除txt文件中的某一行

1、vb无法直接删除文本文件中的某一行。

2、要想做到删除文本文件中的某一行，必须一行行读并进制连接，读要删除的行越过连接，继续连接其它行，直到文件结束。

3、把连接的新串，重新保存为原文件名即可实现所要功能。

求vb点虐删除文本文件中的第一行和最后一行

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

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

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点虐中，如何删除指定文本文档中的指定行的内容，文本中每行大约10个字以内，搜遍网络也没找到答案，谢

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

1、打开文件，

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

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

4、将内容再写回文件。

vb点虐中，如何删除指定文本文档中的指定行的内容

        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开头的文本行。

声明：本文内容由网友自发贡献，本站不承担相应法律责任。对本内容有异议或投诉，请联系2913721942#qq.com核实处理，我们将尽快回复您，谢谢合作！