可能是因为网络的原因,系统没有找到合适的歌词。请稍后重试"; } }//end if(hasLrc) }//end if(!isFF) }//if(lrcID)结束}//if (r!=null)结束Function bdBytes2Str(vIn) strReturn = "" For i = 1 To LenB(vIn)ThisCharCode = AscB(MidB(vIn,i,1)) If ThisCharCode < &H80 Then strReturn = strReturn & Chr(ThisCharCode) Else NextCharCode = AscB(MidB(vIn,i+1,1)) strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode)) i = i + 1 End If Next bdBytes2Str = strReturn End Function