共用方式為

Imports 介面

  • 發行項

包含匯入 Visual Basic 專案的所有專案集合。指定的 imports 陳述式將直接傳給編譯器，並套用至專案中的所有檔案。

命名空間: VSLangProj
組件： VSLangProj (在 vslangproj.dll 中)

語法

'宣告
<GuidAttribute("642789F9-210D-4574-96FD-5A653451E216")> _
Public Interface Imports
    Inherits IEnumerable
'用途
Dim instance As Imports

[GuidAttribute("642789F9-210D-4574-96FD-5A653451E216")] 
public interface Imports : IEnumerable

[GuidAttribute(L"642789F9-210D-4574-96FD-5A653451E216")] 
public interface class Imports : IEnumerable

/** @attribute GuidAttribute("642789F9-210D-4574-96FD-5A653451E216") */ 
public interface Imports extends IEnumerable

GuidAttribute("642789F9-210D-4574-96FD-5A653451E216") 
public interface Imports extends IEnumerable

備註

此物件替專案指定匯入的命名空間。匯入命名空間內的項目可能會在程式碼中使用，而不會完全限制項目的名稱。例如，如果 Imports 物件中包含 Namespace1.Namespace2 匯入陳述式，則下列兩個程式碼中的陳述式同樣有效：

Namespace1.Namespace2.SomeMethod()
SomeMethod()

如果 imports 陳述式不在集合中，上述第二個未加限定的陳述式就會導致建置錯誤。

範例

' Macro Editor
' This routine displays all the project imports.
Imports VSLangProj
Public Sub ListImports()
   ' The first project is a Visual Basic or C# project.
   Dim vsproject As VSProject = _
      CType(DTE.Solution.Projects.Item(1).Object, VSProject)
        
   Dim projImports As VSLangProj.Imports = vsproject.Imports
   ' For C# projects, projImports will be Nothing.
   If Not (projImports Is Nothing) Then
      Dim i As Integer
      For i = 1 To projImports.Count
         MsgBox(projImports.Item(i))
      Next
   Else
      MsgBox("This project has no imports.")
   End If
End Sub

請參閱

參考

Imports 成員
VSLangProj 命名空間