為何不能建立資料夾？(編號：1130)

請問這程式哪裡錯？
If Dir("C:\Program Files\MyDir") = "" Then
　　　　MkDir "C:\Program Files\MyDir"
　　End If