ahi estas creando un archivo , no una carpeta...debe ser:
saludos.
Código (vbnet) [Seleccionar]
System.IO.Directory.CreateDirectory(FileIO.SpecialDirectories.ProgramFiles & "\BrodaSoft2")
saludos.