Software Developer's Kit - ChemDraw

Send comments on this topic
Application Property
See Also 

Description

Member of ChemDraw Control.Bonds

Returns the application associated with the bonds collection.

Property type

Read-only property

Syntax

Visual Basic
Public Property Application() As Object

Return Type

Remarks

This property returns the application associated with the collection of bonds.

Example

'Declares variables 
 Dim myBonds As ChemDrawControl11Ctl.Bonds
 Set myBonds = ctlChemDraw.Selection.Objects.Bonds   
 Dim MyParent As ChemDrawControl10Ctl.Object

 Private Sub cmdBonds_Click()
    'returns the application of the Bonds collection
     Text1.text = MyBonds.Application
    'returns the number of Bonds in the Bonds collection
     Text2.text = MyBonds.Count 
    'sets the Item(1) of the Bonds collection 
     myBonds.Item(1).BondDisplay = 2
    'returns element number of Item(1)of the Bonds collection 
     Text3.text = MyBonds.Item(1).BondDisplay    
    'must verify that parent has been set
     Set myParent = ChemDrawControlCtl.Bonds.Parent
 End Sub

See Also