Transform VB .NET Sample
Overview 
Implementation
All important work is done inside OnApply handler for the Apply
button  
     Set iModel = KernelCAD1.GetModel()  
 
retrieves IModel interface (See 
Interface List 
), from which all other interfaces
are accessed.  Interface to the current 
entity is kept into  iSect variable. It is obtained in the same
procedure using calls identical to  
  Set iSect = iModel.GetEntity(0)
   
  
 An instance of ITransform
  interface implemented by the object is obtained with assignment: 
  
Dim iTransf As ITransform = iSect 
KernelCAD1.UpdateSurface  
call in the end of the Sub is required to recalculate surface of the object
after changes in its parameters.  
The offset operation is performed with 
IMeshMods.Offset in the same sub. IMeshMods 
is obtained via query ISection
> IMesh
> IMeshMods. 
See also: Overview,
All VB .NET Samples 
                 |