Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim MyFolder As DirectoryInfo = New DirectoryInfo(TextBox1.Text)
If MyFolder.Exists Then
MsgBox("같은 이름의 폴더가 있습니다")
Else
MyFolder.Create()
End If
End Sub
End Class