Avete un esempio per creare una nuova cartella premendo un command button in visual basic?

Esempio:
codice:
Private Sub Command1_Click()
 crea cartella "pippo" in c:\windows\desktop
End Sub
Sapete aiutarmi?

Grazie,