字符串如下：
14/15/19/20/21/22/23/26/27/28/29/36/                                 
如何显示单个数字？

有点头晕，请大家帮忙！谢谢！

clea
s=alltrim('14/15/19/20/21/22/23/26/27/28/29/36/                                  ')
? s
for i=1 to occurs('/',s)
    cTmpvar1=left(s,at('/',s)-1)
    ? cTmpvar1
    s=right(s,len(s)-at('/',s))
endfor

还可以语句更少吗？

解决了，谢谢！

谢谢各位大神！非常简洁！

1、根据我程序的需要，我的代码去掉不必要内容，缩减后最实用。
2、各位的代码只有"红星二锅头"的可以在6下运行，其他都要在9下运行，目前这个需要在6下运行！

再次谢谢各位大神！谢谢！

谢谢！