2020年1月2日

摘要: function GetSubStrCount(sSubStr, sParentStr: string): integer; begin Result := 0; while Pos(UpperCase(sSubStr), UpperCase(sParentStr)) <> 0 do begin s 阅读全文

posted @ 2020-01-02 08:40 阿骏骏 阅读(397) 评论(0) 推荐(0)


博客园  ©  2004-2025
浙公网安备 33010602011771号 浙ICP备2021040463号-3