Remove All The Vertices On An In-Memory Schematic Feature Link Snippet

        /// <summary>
        /// Remove all the vertices that display along an in-memory schematic feature link
        /// </summary>
        /// <param name="schemLink">The ISchematicInMemoryFeatureLink for which all the vertices must be removed</param>
        public void RemoveAllVerticesFromLink(ESRI.ArcGIS.Schematic.ISchematicInMemoryFeatureLink schemLink)
        {
                // cast SchematicInMemoryFeatureLink into ISchematicInMemoryFeatureLinkGeometry
                ESRI.ArcGIS.Schematic.ISchematicInMemoryFeatureLinkGeometry myGeo=(ESRI.ArcGIS.Schematic.ISchematicInMemoryFeatureLinkGeometry)schemLink;
                if (myGeo != null)
                {
                        myGeo.RemoveAllVertices();
                }
        }

        ''' <summary>
        ''' Remove all the vertices that display along an in-memory schematic feature link
        ''' </summary>
        ''' <param name="schemLink">The ISchematicInMemoryFeatureLink for which all the vertices must be removed</param>
        Public Sub RemoveAllVerticesFromLink(ByVal schemLink As ESRI.ArcGIS.Schematic.ISchematicInMemoryFeatureLink)
                ' cast SchematicInMemoryFeatureLink into ISchematicInMemoryFeatureLinkGeometry
                Dim myGeo As ESRI.ArcGIS.Schematic.ISchematicInMemoryFeatureLinkGeometry=TryCast(schemLink, ESRI.ArcGIS.Schematic.ISchematicInMemoryFeatureLinkGeometry)
                If myGeo IsNot Nothing Then
                        myGeo.RemoveAllVertices()
                End If
        End Sub