Software Developer's Kit - ChemDraw

Send comments on this topic
Application Property
See Also 


Member of ChemDraw Control.Bonds

Returns the application associated with the bonds collection.

Property type

Read-only property


Visual Basic
Public Property Application() As Object

Return Type


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


'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