本文整理匯總了VB.NET中System.CodeDom.CodeDirectiveCollection類的典型用法代碼示例。如果您正苦於以下問題：VB.NET CodeDirectiveCollection類的具體用法？VB.NET CodeDirectiveCollection怎麽用？VB.NET CodeDirectiveCollection使用的例子？那麽, 這裏精選的類代碼示例或許可以為您提供幫助。
在下文中一共展示了CodeDirectiveCollection類的1個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: CodeDirectiveCollection
' Creates an empty CodeDirectiveCollection.
Dim collection As New CodeDirectiveCollection()
' Adds a CodeDirective to the collection.
collection.Add(New CodeRegionDirective(CodeRegionMode.Start, "Region1"))
' Adds an array of CodeDirective objects to the collection.
Dim directives As CodeDirective() = {New CodeRegionDirective(CodeRegionMode.Start, "Region1"), New CodeRegionDirective(CodeRegionMode.End, "Region1")}
collection.AddRange(directives)
' Adds a collection of CodeDirective objects to the collection.
Dim directivesCollection As New CodeDirectiveCollection()
directivesCollection.Add(New CodeRegionDirective(CodeRegionMode.Start, "Region2"))
directivesCollection.Add(New CodeRegionDirective(CodeRegionMode.End, "Region2"))
collection.AddRange(directivesCollection)
' Tests for the presence of a CodeDirective in the
' collection, and retrieves its index if it is found.
Dim testDirective = New CodeRegionDirective(CodeRegionMode.Start, "Region1")
Dim itemIndex As Integer = -1
If collection.Contains(testDirective) Then
itemIndex = collection.IndexOf(testDirective)
End If
' Copies the contents of the collection beginning at index 0 to the specified CodeDirective array.
' 'directives' is a CodeDirective array.
collection.CopyTo(directives, 0)
' Retrieves the count of the items in the collection.
Dim collectionCount As Integer = collection.Count
' Inserts a CodeDirective at index 0 of the collection.
collection.Insert(0, New CodeRegionDirective(CodeRegionMode.Start, "Region1"))
' Removes the specified CodeDirective from the collection.
Dim directive = New CodeRegionDirective(CodeRegionMode.Start, "Region1")
collection.Remove(directive)
' Removes the CodeDirective at index 0.
collection.RemoveAt(0)
End Sub
End Class