How to create a new folder in VB.net

microsoft scripting runtime 

'Import namespace so you can manipulate files and folders
Imports System.IO
 
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As 

System.EventArgs) Handles Button1.Click
        ' Check if folder exists, if not: create it
        If Not Directory.Exists("C:\New Folder") Then
            Directory.CreateDirectory("C:\New Folder")
            ' Folder created message
            MessageBox.Show("Folder created!", "Info", MessageBoxButtons.OK, 

MessageBoxIcon.Information)
        Else
            ' Folder already exists
            MessageBox.Show("Folder already exists!", "Info", MessageBoxButtons.OK, 

MessageBoxIcon.Stop)
        End If
    End Sub
 
End Class