QQ网名大全

vb 编程语言问题

你用文件的形式把
我给你部分代码其余的你自己想像把
For i = 0 To Dir1.ListCount
If Dir1.ListCount <> 0 Then
Dir1.Path = Dir1.List(i)
MsgBox "aa"
For j = 0 To Dir1.ListCount
MsgBox "aa"
If Dir1.ListCount <> 0 Then
Dir1.Path = Dir1.List(i)
For k = 0 To Dir1.ListCount
Dir1.Path = Dir1.List(i)
MsgBox "aa"
Next k
Else
Dir1.Path = "e:\"

End If

Next j
End If

Next i
我 的程序不算太好。但是可以达到过滤路径。你可以在这个程序上面加点代码。我的程序起初想做破坏性的程序了。就因为这中方法有点慢。所以我把他放弃了
佚名
2024-05-19 15:22:49
最佳回答
类似问题(10)