关于字符串截取求助
各位大哥，我是初学者。有个简单的问题求助大家！是关于字符串计算并截取的，一列备注型字段。
如：2月2号某某某<还>[舰艇知识],<借>[现代兵器],<还>[程序设计],<借>[excel vba]
也有没有还和借，或是只发生一组还与借。怎么编写循环分别提取对应的<还>与<借>并写入新表
谢谢大家
[解决办法]
Create Cursor T1 (日期 C(20),借还书人 C(10),标记 C(2),书名 C(50)) &&像 wwwwa 所讲，人和收都应该用ID，就你问题我暂用名称
lcStr="2月2号某某某 <还>[舰艇知识], <借>[现代兵器], <还>[程序设计], <借>[excel vba]"
lcRQ=Left(lcStr,At("号",lcStr)+1)
lcXM=Substr(lcStr,At("号",lcStr)+2,At("<",lcStr)-At("号",lcStr)-2)
m.lnTotal=Occurs("<",lcStr)
For m.lnI=1 To m.lnTotal
Insert Into T1 Values (lcRQ,lcXM,Strextract(lcStr,"<",">",m.lnI),Strextract(lcStr,"[","]",m.lnI))
&& 函数 STREXTRACT() 需要 VFP8.0 或 VFP9.0
Endfor
Locate
Browse
