vb点虐 刪除文件 vb 删除文件

VB点虐 在listview中添加checkbox，用来选中和删除txt文件

'以下是删除列表中的数据

成都创新互联公司于2013年开始，先为建安等服务建站，建安等地企业，进行企业商务咨询服务。为建安企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

For i = ListView1.ListItems.Count To 1 Step -1

If ListView1.ListItems(i).Checked = True Then

ListView1.ListItems.Remove (i)

End If

Next i

VB如何删除指定目录下的文件夹，并且删除里面的子目录和文件并不会提示和删除到回收站

Public Class Form1

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

If FolderBrowserDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then

TextBox1.Text = FolderBrowserDialog1.SelectedPath

Else

MsgBox("OpenFolder Error", MsgBoxStyle.Critical)

Exit Sub

End If

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Try

If TextBox1.Text "" Then

My.Computer.FileSystem.DeleteDirectory(TextBox1.Text, FileIO.DeleteDirectoryOption.DeleteAllContents)

MessageBox.Show("Finished!")

End If

Catch ex As Exception

MessageBox.Show(ex.ToString)

End Try

End Sub

End Class

在VB.NET 2010编译运行通过。

注意要加一个FolderBrowserDialog控件。

vb点虐 如何实现txt内容删除？

这么菜的问题，分还挺高啊，循环读文件，每次一行，跟你输入的内容比较一样就记录行号并且终止循环，并且新建个文件写入从开头到第（你记录的行号-1）行的内容和（你记录的行号+1）行以后的内容，把源文件删了，把新文件改名为老文件名，不一样就继续循环读取，到最后读完都没有则提示没有这个内容

就这样，具体程序自己写，如果没耐心那就没办法了 学不来编程了

网站栏目：vb点虐 刪除文件 vb 删除文件
分享路径：http://shouzuofang.com/article/ddjegop.html