根據(jù)定義類型，在需要使用的時候調(diào)用即可比如 事先定義了一個 函數(shù) lt #39這是一個替換html標(biāo)簽的函數(shù)過程 Function HtmlDecodeByVal fStringIf IsNullfString Or TrimfString = quotquot Then PE_HtmlDecode = quotquotExit。

不用，有函數(shù)可以直接過濾掉所有的尤其是腳本函數(shù)的 Public Function ReplacehtmlTextstrDim Str，re Str=Textstr Set re=new RegExp reIgnoreCase =True reGlobal=True rePattern=quotlt^*quotStr=reReplace。

如下lt #39過濾html標(biāo)簽函數(shù) Function DelhtmlCon，CodeDo while instrlcasecon，quotltquotCodeps = instrlcaseCon，quotltquotCodepe = instrps，Con，quotquot+1 p = midcon，ps，pepscon = replaceCon，p，quot。

public static string NoHtmlstring text 刪除腳本 text = RegexReplacetext， @quotltscript^*？*？ltscriptquot， quotquot， RegexOptionsIgnoreCase刪除HTML text = RegexReplacetext， @quotlt^*quot。

Set Matches = objRegExpExecutestrHTML#39 遍歷匹配集合，并替換掉匹配的項目 For Each Match in Matches strHtml=ReplacestrHTML，MatchValue，quotquotNext #39RemoveHTML=strHTML iflenstrHTMLstrLenthen RemoveHTML。