Methods

AddWedge Method (IntelliCAD)

AddXRecord Method

Collapse All Expand All

Description

Syntax

Visual Basic
Public Function AddWedge( _ ByVal Origin As Point, _ ByVal Length As Double, _ ByVal Width As Double, _ ByVal Height As Double _ ) As Solid3D

Private Sub AddWedge_Example()

' This example adds a wedge to the drawing using the AddWedge method.

Dim myDoc As IntelliCAD.Document

Dim wedgeObj As IntelliCAD.PolygonMesh

Dim origPt As Point

Set myDoc = ActiveDocument

Set origPt = Library.CreatePoint(2, 1, 0)

Set wedgeObj = ThisDocument.ModelSpace.AddWedge(origPt, 3, 2, 2)

wedgeObj.Update

ThisDocument.Application.ZoomExtents

End Sub