CodeClass2.RemoveBase Method
Removes an object from the list of bases.
Namespace: EnvDTE80
Assembly: EnvDTE80 (in EnvDTE80.dll)
Syntax
'Declaration
Sub RemoveBase ( _
Element As Object _
)
void RemoveBase(
Object Element
)
void RemoveBase(
Object^ Element
)
abstract RemoveBase :
Element:Object -> unit
function RemoveBase(
Element : Object
)
Parameters
Element
Type: ObjectRequired. A CodeElement or the name of one in the collection.
Remarks
The element removed can be either a CodeElement object that is in the collection or the name of a unique element in the collection.
Note
The values of code model elements such as classes, structs, functions, attributes, delegates, and so forth can be non-deterministic after making certain kinds of edits, meaning that their values cannot be relied upon to always remain the same. For more information, see the section Code Model Element Values Can Change in Discovering Code by Using the Code Model (Visual Basic).
Examples
[Visual Basic]
Sub RemoveBaseExample(ByVal dte As DTE2)
' NOTE: This example requires a reference to the
' System.Collections namespace.
' Before running this example, open a code document from a project
' and place the insertion point inside a class definition.
Try
' Retrieve the CodeClass at the insertion point.
Dim sel As TextSelection = _
CType(dte.ActiveDocument.Selection, TextSelection)
Dim cls As CodeClass = _
CType(sel.ActivePoint.CodeElement( _
vsCMElement.vsCMElementClass), CodeClass)
If MsgBox("Remove all bases from " & cls.Name & "?", _
MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
' Remove every base except System.Object.
Dim bases As New ArrayList()
Dim base As CodeElement
For Each base In cls.Bases
If base.FullName <> ConvertFullName( _
cls.ProjectItem.ContainingProject.CodeModel, _
"System.Object") Then
bases.Add(base)
End If
Next
For Each base In bases
cls.RemoveBase(base)
Next
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Function ConvertFullName(ByVal cm As CodeModel, _
ByVal fullName As String) As String
' Convert a .NET type name into a C++ type name.
If (cm.Language = CodeModelLanguageConstants.vsCMLanguageVC) Or _
(cm.Language = CodeModelLanguageConstants.vsCMLanguageMC) Then
Return fullName.Replace(".", "::")
Else
Return fullName
End If
End Function
[C#]
public void RemoveBaseExample(DTE2 dte)
{
// NOTE: This example requires a reference to the
// System.Collections namespace.
// Before running this example, open a code document from a project
// and place the insertion point inside a class definition.
try
{
// Retrieve the CodeClass at the insertion point.
TextSelection sel =
(TextSelection)dte.ActiveDocument.Selection;
CodeClass cls =
(CodeClass)sel.ActivePoint.get_CodeElement(
vsCMElement.vsCMElementClass);
if (MessageBox.Show("Remove all bases from " + cls.Name + "?",
"", MessageBoxButtons.YesNo) == DialogResult.Yes)
{
// Remove every base except System.Object.
ArrayList bases = new ArrayList();
foreach (CodeElement baseElement in cls.Bases)
{
if (baseElement.FullName != ConvertFullName(
cls.ProjectItem.ContainingProject.CodeModel,
"System.Object"))
bases.Add(baseElement);
}
foreach (CodeElement baseElement in bases)
cls.RemoveBase(baseElement);
}
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
string ConvertFullName(CodeModel cm, string fullName)
{
// Convert a .NET type name into a C++ type name.
if ((cm.Language == CodeModelLanguageConstants.vsCMLanguageVC) ||
(cm.Language == CodeModelLanguageConstants.vsCMLanguageMC))
return fullName.Replace(".", "::");
else
return fullName;
}
.NET Framework Security
- Full trust for the immediate caller. This member cannot be used by partially trusted code. For more information, see Using Libraries from Partially Trusted Code.
See Also
Reference
Other Resources
How to: Compile and Run the Automation Object Model Code Examples