Software Developer's Kit - ChemDraw

Send comments on this topic
DoubleValue Property
See Also 

Description

Member of ChemDraw Control.ObjectTag.

Sets and returns the value of the tag as a floating-point number.

Property type

Read-write property

Syntax

Visual Basic
Public Property DoubleValue() As Double

Return Type

Double

Remarks

Sets and returns the value of the tag as a floating-point number. See ObjectTag.ObjectTagType property and ChemDrawCtl.Objects.FilterByTagDouble.

Example

'Shows example of DoubleValue
 Dim myObjectTag as ChemDrawControl10Ctl.ObjectTag
 Dim myObject as ChemDrawControl10Ctl.Object
 Dim vName as String 
 Dim varDoubleValue as Double

 Private Sub Load_ObjectTag_Click()
    If  myObjectTag is Nothing Then
        vMessage = MsgBox(“No ObjectTag is loaded”, vbCritical + vbOKOnly, “Error”)
        vName = “Name_of_ObjectTag”
        ‘Makes an ObjectTag
        myObject.MakeObjectTag vName, myObjectTag, True
        ‘ObjectTag must be visible
        myObjectTag.Visible = True
        ‘Assigns a double Value to ObjectTag.StringValue 
        myObjectTag.String = StrConv(varDoubleValue)  
        ‘myObjectTag.DoubleValue = varDoubleValue 
    End If
End Sub

See Also