zoukankan      html  css  js  c++  java
  • vb 去掉html中的回车和tab;转换部分html大写标签为小写

    '//去掉各种回车空格符  

    Public Function replaceEnter(bStr As String)  

        bStr = Replace(bStr, " ", "")  

        bStr = Replace(bStr, vbTab, "")  

        bStr = Replace(bStr, vbCrLf, "")  

        bStr = Replace(bStr, Chr(13) + Chr(10), "")  

        bStr = Replace(bStr, Chr(13), "")  

        bStr = Replace(bStr, Chr(10), "")  

        replaceEnter = bStr  

    End Function  

    '//网页标签改为小写  

    Public Function htmlLableToSmall(strHtml As String)  

        strHtml = Replace(strHtml, "<A", "<a")  

        strHtml = Replace(strHtml, "</A", "</a")  

        strHtml = Replace(strHtml, "<SPAN", "<span")  

        strHtml = Replace(strHtml, "</SPAN", "</span")  

        strHtml = Replace(strHtml, "<DIV", "<div")  

        strHtml = Replace(strHtml, "</DIV", "</div")  

        strHtml = Replace(strHtml, "<UL", "<ul")  

        strHtml = Replace(strHtml, "</UL", "</ul")  

        strHtml = Replace(strHtml, "<LI", "<li")  

        strHtml = Replace(strHtml, "</LI", "</li")  

        strHtml = Replace(strHtml, "<IMG", "<img")  

        strHtml = Replace(strHtml, "</IMG", "</img")  

        strHtml = Replace(strHtml, "<P", "<p")  

        strHtml = Replace(strHtml, "</P", "</p")  

        strHtml = Replace(strHtml, "<STRONG", "<strong")  

        strHtml = Replace(strHtml, "</STRONG", "</strong")  

        strHtml = Replace(strHtml, "<EM", "<em")  

        strHtml = Replace(strHtml, "</EM", "</em")  

        strHtml = Replace(strHtml, "<DL", "<dl")  

        strHtml = Replace(strHtml, "</DL", "</dl")  

        strHtml = Replace(strHtml, "<DD", "<dd")  

        strHtml = Replace(strHtml, "</DD", "</dd")  

        strHtml = Replace(strHtml, "<DT", "<dt")  

        strHtml = Replace(strHtml, "</DT", "</dt")  

        strHtml = Replace(strHtml, "<B", "<b")  

        strHtml = Replace(strHtml, "</B", "</b")  

        htmlLableToSmall = strHtml  

    End Function  

  • 相关阅读:
    单例模式 异常抛出
    「分块系列」数列分块入门7 解题报告
    「分块系列」数列分块入门4 解题报告
    「分块系列」数列分块入门5 解题报告
    「分块系列」数列分块入门6 解题报告
    「分块系列」数列分块入门3 解题报告
    「分块系列」数列分块入门2 解题报告
    「分块系列」数列分块入门1 解题报告
    「黑科技」查错神器——对拍
    「洛谷P1196」「NOI2002」银河英雄传说 解题报告
  • 原文地址:https://www.cnblogs.com/yf1019091807/p/5831173.html
Copyright © 2011-2022 走看看