>>15
Symbolaをフォントに設定した所、文字化けは無くなったんですが

re=CreateOleObj("VBScript.RegExp")
re.pattern = "😀"
~IEでソースを取得するまでの処理

IFB True = re.Test(str) THEN
PRINT "マッチしている"
ELSE
PRINT "マッチしてない"
ENDIF

re.patternに😀を入れるとエラーメッセージも出ずに直ぐに動作を停止してしまうんですよねえ…