Question

VB 怎么删除filelistbox选中的文件？

要求单击command就可以删除filelistbox中选中的文件，该怎么写代码啊？急求代码！各位帮帮忙！

Answer 1

方法1：
在filelistbox的click事件写代码：
kill ......
方法2：
若要在command的click事件写代码，要判断是否选择了文件才作删除：
if len(file1.filename)>0 then
kill ......
end if

Answer 2

File1.Path & "\" & File1.FileName可以得到文件路径
代码如下
kill File1.Path & "\" & File1.FileName

追问

如果没选中文件就单击command就会有错误“文件未找到”，怎么判断file是否选中了文件，选中了再kill？

追答

很简单，判断一下File1.FileName是否不为空

Answer 3

最佳答案来了：
Private Sub Command1_Click()
Kill File1.Path & "\" & File1.FileName
File1.Refresh
End Sub
Private Sub Form_Load()
File1.Path = App.Path
End Sub