occurs( ) 函数示例

store 'abracadabra' to gcstring
clear
? occurs('a', gcstring)  && 显示 5
? occurs('b', gcstring)  && 显示 2
? occurs('c', gcstring)  && 显示 1
? occurs('e', gcstring)  && 显示 0