假设：Rs("str") 为读取记录中的str字段如下可得到关键字前后10个字符的字符串：str=mid(Rs("str"),instr(Rs("str"),keyword1)-10,len(keyword1)+20)
