文件夹中文件名称的获取，并相应的添加或删除对应的文件夹或文佳

1、获取文件夹中文件夹的名称，并添加或删除对应的文件夹
<1> 获取文件夹的名称
fldPath = “相对应的路径名称”
dirInfo = New DirectoryInfo(fldPath)
files = dirInfo.GetFiles()
dirInfo1 = dirInfo.GetDirectories()
<2> 删除对应的文件夹
For i As Integer =0 To dirNGInfo1.Length
If Directory.Exists(dirInfo1(i).FullName.ToString()) = True Then
Directory.Delete(dirInfo1(i).FullName.ToString(), True)
End If
Next
注意：1°倘若删除文件夹写成 Directory.Delete(DelPath)会报警：目录不是空的，该文件夹将不会被删除
2°倘若删除文件夹写成 Directory.Delete(DelPath, True)，仍旧报警：目录不是空的，此时的解决方式：右键文件夹》属性》安全》在相应的权限上，勾选“完全控制”
相应的权限：everyone
<3> 添加新的文件夹
If Directory.Exists(FilePath) = False Then
Directory.CreateDirectory(FilePath)
End If

2、获取文件夹中文件的名称，并添加或删除对应的文件夹
<1> 获取文件的名称
fldPath = “相对应的路径名称”
dirInfo = New DirectoryInfo(fldPath)
files = dirInfo.GetFiles()
<2> 删除对应的文件
For i As Integer =0 To files .Length
If Directory.Exists(files (i).ToString()) = True Then
Directory.Delete(files (i).ToString())
End If
Next
<3> 添加新的文件
If Directory.Exists(FilePath) = False Then
Directory.Create(FilePath)
End If