Syntax
Public Function FindItemInComboBox(formID As String, ComboName As String, indexStart As Integer, text As String) As Long
Description
This function is used to return the index of an entered item starting from a specific index.
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. |
indexStart | The index to start search from, value of Type Integer |
text | The text to search for, value of type String. |
Return value
Returns the index of the first occurrence of the entered text; if it is not existed, it returns (-1).
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 AlertMessage "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 : " & CData End Sub
See Also