Friday 26 July 2024

Visual FoxPro ASCAN(), Scan Array



 DIMENSION FriendArray(5)

STORE 'Ram' TO FriendArray(1)

STORE 'Shyam' TO FriendArray(2)

STORE 'Sohan' TO FriendArray(3)

STORE 'Mohan' TO FriendArray(4)

STORE 'Rohan' TO FriendArray(5)

srchText = 'Shyam'


indexno = ASCAN(FriendArray,srchText)

MESSAGEBOX(indexno)





No comments:

Post a Comment

Please, Write your valuable comments..