このタイプのハイライトは、editplusハイライトに基づいて行われます
コードコピーは次のとおりです。
classwyd_aspcodehighlight
privateregex
publicKeyWord、ObjectCommand、文字列、VBCode
publicKeyWordColor、ObjectCommandColor、StringsColor、コメント、CodeColor
privatesubclass_initialize（）
setRegex = newRegexp
regex.ignorecase = true '文字がケースに敏感であり、trueが区別されないかどうかを設定します。
regex.global = true 'はフルプロセスの性質を設定します。
keywordcolor = "＃0000ff"
objectcommandcolor = "＃ff0000"
stringscolor = "＃ff00ff"
コメント= "＃008000"
codecolor = "＃993300"
keyword = "set | private | if | then | sub | end | function | for | next | do | while | wend | true | false | nothing | class" 'Guan Jian Yourselfを追加してください
objectCommand = "left | mid | right | int | clng | string | join | array" '関数自分で追加してください
vbcode = ""
Endingub
privatesubclass_terminate（）
setRegex =何もない
Endingub
privatefunctionm_replace（str、パターン、色）
regex.pattern = pattern 'セットモード。
m_replace = regex.replace（str、 "<fontcolor ="＆color＆ "> $ 1 </font>"）
エンド機能
privatefunctionstring_replace（str、pattern、pattern1、color、isstring）
dimtemp、retstr
regex.pattern = pattern1
setMatches = regex.execute（str）
foreachmatchinmatchesのマッチコレクションのトラバーサル
temp = re（match.value）
str =置換（str、match.value、temp）
次
regex.pattern = pattern 'セットモード。
ifisstring = 1then
string_replace = regex.replace（str、 "<fontcolor ="＆color＆ ">" $ 1 "</font>"）
それ以外
string_replace = regex.replace（str、 "<fontcolor ="＆color＆ "> $ 1 </font>"）
endif
エンド機能
privateFunctionre（str）
Dimtregex、温度
setTregex = newRegexp
tregex.ignorecase = true 'は、文字がケースに敏感かどうかを設定します。