我开始创建一个文件夹
的程序
这就是我现在所拥有的,现在我想做的是拥有两个文本框,一个文本框用于目录,另一个用于文件夹名称,我该如何实现呢?
Private Sub CreateBTN_Click(sender As Object, e As EventArgs) Handles CreateBTN.Click
Dim Path As String = txttargerdirectory.Text
If Not Directory.Exists(Path) Then
Directory.CreateDirectory(Path)
MsgBox("folder created")
Else
MsgBox("Folder already exist")
End If
End Sub
答案 0 :(得分:3)
你在找这样的东西吗?
Private Sub CreateBTN_Click(sender As Object,
e As EventArgs) Handles CreateBTN.Click
Dim sPath As String = IO.Path.Combine(txtPath.Text, txtFolderName.Text)
If Not IO.Directory.Exists(sPath) Then
IO.Directory.CreateDirectory(sPath)
MsgBox("folder created")
Else
MsgBox("Folder already exist")
End If
End Sub