.版本 2 .子程序 去html代码子程序1, 文本型, 公开 .参数 str, 文本型 .局部变量 _局部1, 彗星正则表达式类 str ＝ 子文本替换 (str, #换行符, “”, , , 真) str ＝ 子文本替换 (str, “</p>”, #换行符, , , 真) str ＝ 子文本替换 (str, “<br/>”, #换行符, , , 真) CoInitialize (0) _局部1.创建 (“<(.|\n)+?>”, 假) str ＝ _局部1.替换 (str, “”) CoUninitialize () 返回 (str)