国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

查找替換所選字符

2019-11-18 17:51:17
字體：大 中 小
來源：轉載
供稿：網友
->FunctionsReplace(SearchLineAsString,SearchForAsString,ReplaceWithAsString)
DimvSearchLineAsString,foundAsInteger

found=InStr(SearchLine,SearchFor):vSearchLine=SearchLine
Iffound<>0Then
vSearchLine=""
Iffound>1ThenvSearchLine=Left(SearchLine,found-1)
vSearchLine=vSearchLine ReplaceWith
Iffound Len(SearchFor)-1<Len(SearchLine)Then_
vSearchLine=vSearchLine Right$(SearchLine,Len(SearchLine)-found-Len(SearchFor) 1)
EndIf
sReplace=vSearchLine

EndFunction->
->

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 达日县| 报价| 尚志市| 恩平市| 屏南县| 武邑县| 晋城| 闽清县| 满城县| 明光市| 福泉市| 休宁县| 萝北县| 呈贡县| 北海市| 新竹县| 苏尼特右旗| 天峨县| 会同县| 淮南市| 疏勒县| 营山县| 车险| 江阴市| 防城港市| 吴旗县| 建昌县| 嵊州市| 应城市| 和硕县| 尤溪县| 略阳县| 泰和县| 孙吴县| 任丘市| 屯留县| 吉安县| 锦州市| 昌图县| 锦屏县| 西华县|