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 删除文件
分享URL:http://azwzsj.com/article/ddjegop.html