Syntax
Public Function SetComboBoxData(formID As String, ComboName As String, prop_Id As ENUM_GUI_COMBO_ACTION, prop_Value As Variant) As BooleanDescription
This function is used to set data according to a given property id for a specific combo box item.
Parameters
| Key | Description |
| formId | Form identifier, must be a number greater than 3000 and less than 10,000. |
| ComboName | ComboBox identifier, value of type String. |
| prop_Id | Value can be one of the ENUM_GUI_COMBO_ACTION |
| prop_Value | The value of the specified property. |
Return value
Returns true if the specified ComboBox data has been sat. Otherwise, returns false. In order to get an error, call GetLastError() function.
Sample
Public Sub main() ''''TODO: Script program start method dim frmID,CData frmID = "6500" CreateVTLForm CLng(frmID) , true CreateVTLControl CSTR(frmID), "cmbA" , GUI_COMBO_BOX SetComboBoxData CSTR(frmId),CSTR("cmbA"),COMBO_ADD_ITEM,"ComboBox Item 1" SetComboBoxData CSTR(frmId),CSTR("cmbA"),COMBO_ADD_ITEM,"ComboBox Item 2" GetComboBoxData CSTR(frmId),CSTR("cmbA"),COMBO_COUNT,CData msgBox "Combo Box Count = " & CSTR(CData) CData = FindItemInComboBox (CSTR(frmId),CSTR("cmbA"),CINT(1),CSTR("ComboBox Item 1")) AlertMessage "Find Item In Combo Box - ComboBox Item 1 : " & CDataEnd SubSee Also