MusicGet 类(7)

            case 0    '左右都截取（都取前面）（去处关键字）
            GetContent=Right(str,Len(str)-Instr(lcase(str),lcase(start))-Len(start)+1)
            GetContent=Left(GetContent,Instr(lcase(GetContent),lcase(last))-1)
            case 1    '左右都截取（都取前面）（保留关键字）
            GetContent=Right(str,Len(str)-Instr(lcase(str),lcase(start))+1)
            GetContent=Left(GetContent,Instr(lcase(GetContent),lcase(last))+Len(last)-1)
            case 2    '只往右截取（取前面的）（去除关键字）
            GetContent=Right(str,Len(str)-Instr(lcase(str),lcase(start))-Len(start)+1)
            case 3    '只往右截取（取前面的）（包含关键字）
            GetContent=Right(str,Len(str)-Instr(lcase(str),lcase(start))+1)
            case 4    '只往左截取（取后面的）（包含关键字）
            GetContent=Left(str,InstrRev(lcase(str),lcase(start))+Len(start)-1)
            case 5    '只往左截取（取后面的）（去除关键字）
            GetContent=Left(str,InstrRev(lcase(str),lcase(start))-1)
            case 6    '只往左截取（取前面的）（包含关键字）
            GetContent=Left(str,Instr(lcase(str),lcase(start))+Len(start)-1)
            case 7    '只往右截取（取后面的）（包含关键字）
            GetContent=Right(str,Len(str)-InstrRev(lcase(str),lcase(start))+1)
            case 8    '只往左截取（取前面的）（去除关键字）
            GetContent=Left(str,Instr(lcase(str),lcase(start))-1)
            case 9    '只往右截取（取后面的）（包含关键字）