BeforeComboBoxDropDown event

Use this event to dynamically fill the combo box list, when its property is set to Fill in Script using the configured delimiter.

If the combo box behavior is additionally set to Restricted content for each value a description can be added that is separated by the description delimiter. With the Project.Resources object you can also provide translations for each description.

ValidationForm_BeforeComboBoxDropDown( _
    ByVal ComboboxName As String, _
    ByVal pXDoc As CASCADELib.CscXDocument, _
    ByRef ComboboxItems As String _
    )

ComboxName: Name of the field displayed as a combo box that triggers this event.
pXDoc: XDocument object that is currently loaded.
ComboboxItems: String containing a separated list of the items displayed in the combo box. By default a semicolon is used as separator for values, a pipe as separator for descriptions, different separators can be configured in the validation form layout designer.

' simple value listing
Private Sub ValidationForm_BeforeComboBoxDropDown(ByVal ComboboxName As String, ByVal pXDoc As CASCADELib.CscXDocument, ByRef ComboboxItems As String)

    Select case ComboboxName
        Case "MyField"
            ComboboxItems = _
               "Order;" & _
               "Invoice;" & _
               "Delivery Note;" & _
               "Credit Note;"
    End Select

End Sub

' value listing with description
Private Sub ValidationForm_BeforeComboBoxDropDown(ByVal ComboboxName As String, ByVal pXDoc As CASCADELib.CscXDocument, ByRef ComboboxItems As String)

    Select case ComboboxName
        Case "MyField"
            ComboboxItems = _
               "Order|1;" & _
               "Invoice|2;" & _
               "Delivery Note|3;" & _
               "Credit Note|4;"
    End Select

End Sub

' value listing with translated description
Private Sub ValidationForm_BeforeComboBoxDropDown(ByVal ComboboxName As String, ByVal pXDoc As CASCADELib.CscXDocument, ByRef ComboboxItems As String)

    Select case ComboboxName
        Case "MyField"
           ComboboxItems = _
            Project.Resources.GetString("Order") "|1;" & _
            Project.Resources.GetString("Invoice") & "|2;" & _
            Project.Resources.GetString("Delivery Note") & "|3;" & _
            Project.Resources.GetString("Credit Note") & "|4;"
    End Select

End Sub

Your search for returned results.

Search tips

BeforeComboBoxDropDown event