VBS_Search_(Method)
Search the specified field for a text string.
Function VBS_Search(row as Variant, column as Variant, text As String) As Long
Parameters
No | Name | Type | Optional | Default | Description |
---|---|---|---|---|---|
1 | row | Variant | No | - | row in the screen where the search begins |
2 | column | Variant | No | - | column in the screen where the search begins |
3 | text | String | No | - | String to search for |
Return Code | Description | ||||
JGS_OK | The search string was found. The 'cursor' parameter contains the position in the screen where the search string begins. | ||||
JGS_NOTCONNECTED | Your application is not connected to a valid session | ||||
JGS_PARAMETERERROR | Missing or invalid parameter | ||||
JGS_SYSERROR | The function failed due to a system error | ||||
JGS_POSITIONERROR | The specified screen position is invalid | ||||
JGS_NOFIELD | The screen is not formatted |
Sample Code
Dim row as Variant
Dim column as Variant
Dim myText as String
Dim result as Long
row = 18
column = 45
myText = "Jolly Giant Software"
result = field.VBS_Search(row, column, myText)
If result = JGS_OK then
... Â Â ' row and column contain the starting position of the text
Else ...
QWS3270 Automation copyright © Jolly Giant Software Inc. All rights reserved.