• <ins id="pjuwb"></ins>
    <blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>
    <noscript id="pjuwb"></noscript>
          <sup id="pjuwb"><pre id="pjuwb"></pre></sup>
            <dd id="pjuwb"></dd>
            <abbr id="pjuwb"></abbr>
            隨筆-20  評論-12  文章-0  trackbacks-0
            將所有的"..."字符串替換成_T("..."),但是不能替換#include后面的字符串
            由于vs的正則表達式懶惰跟貪婪控制語法不明確,只好用2條表達式來實現
            1. 將_T("...")轉換成"..." 
            _T\x28{"[^"]@"}\x29
            \1
            2. 將"..."轉換成_T("..."),其中過濾掉#include 的前綴
            ~(\#include:b){"[^"]@"}
            _T(\1)

            將兩步合成一個宏,添加到IDE環境中.
            Option Strict Off
            Option Explicit Off
            Imports System
            Imports EnvDTE
            Imports EnvDTE80
            Imports EnvDTE90
            Imports System.Diagnostics

            Public Module RecordingModule
                
            Sub replace_str()
                    DTE.Windows.Item(
            "{CF2DDC32-8CAD-11D2-9302-005345000000}").Activate() 'Find and Replace
                    DTE.Find.Action = vsFindAction.vsFindActionReplaceAll
                    DTE.Find.FindWhat 
            = "_T\x28{""[^""]@""}\x29"
                    DTE.Find.ReplaceWith 
            = "\1"
                    DTE.Find.Target 
            = vsFindTarget.vsFindTargetCurrentProject
                    DTE.Find.MatchCase 
            = False
                    DTE.Find.MatchWholeWord 
            = False
                    DTE.Find.MatchInHiddenText 
            = False
                    DTE.Find.PatternSyntax 
            = vsFindPatternSyntax.vsFindPatternSyntaxRegExpr
                    DTE.Find.ResultsLocation 
            = vsFindResultsLocation.vsFindResultsNone
                    DTE.Find.Action 
            = vsFindAction.vsFindActionReplaceAll
                    DTE.Find.Execute()
                    DTE.Windows.Item(
            "{CF2DDC32-8CAD-11D2-9302-005345000000}").Activate() 'Find and Replace
                    DTE.Find.FindWhat = "~(\#include:b){""[^""]@""}"
                    DTE.Find.ReplaceWith 
            = "_T(\1)"
                    DTE.Find.Target 
            = vsFindTarget.vsFindTargetCurrentProject
                    DTE.Find.MatchCase 
            = False
                    DTE.Find.MatchWholeWord 
            = False
                    DTE.Find.MatchInHiddenText 
            = False
                    DTE.Find.PatternSyntax 
            = vsFindPatternSyntax.vsFindPatternSyntaxRegExpr
                    DTE.Find.ResultsLocation 
            = vsFindResultsLocation.vsFindResultsNone
                    DTE.Find.Action 
            = vsFindAction.vsFindActionReplaceAll
                    DTE.Find.Execute()
                    DTE.Windows.Item(
            "{CF2DDC32-8CAD-11D2-9302-005345000000}").Close()
                
            End Sub
            End Module

            后續的應用繼續更改上來.

            posted on 2009-02-10 18:21 宋振華 閱讀(3379) 評論(2)  編輯 收藏 引用

            評論:
            # re: VS正則表達式應用[原創][未登錄] 2009-02-12 13:02 | jans2002
            不錯哈  回復  更多評論
              
            # re: VS正則表達式應用[原創] 2009-02-13 11:24 | 宋震華
            謝謝鼓勵.  回復  更多評論
              
            无码八A片人妻少妇久久| 麻豆精品久久久久久久99蜜桃| 国产成人精品久久| 久久久久久久久无码精品亚洲日韩| 久久av无码专区亚洲av桃花岛| 久久香蕉国产线看观看精品yw| 久久电影网2021| 2021国产精品午夜久久| 久久精品一区二区三区不卡| 午夜视频久久久久一区| 97久久香蕉国产线看观看| 亚洲欧美日韩久久精品| 99久久这里只有精品| 久久精品人人做人人爽电影| 99久久精品免费国产大片| 午夜精品久久久久久中宇| 精品熟女少妇aⅴ免费久久| 久久99精品国产自在现线小黄鸭| 久久久久亚洲AV无码专区桃色| 久久99精品国产自在现线小黄鸭| 亚洲午夜无码久久久久小说| 久久精品国产99国产电影网| 国产精品久久久久蜜芽| 色综合久久88色综合天天 | 精品国产91久久久久久久a| 精品久久久久久无码专区不卡| 亚洲欧美伊人久久综合一区二区| 日本亚洲色大成网站WWW久久| 亚洲综合精品香蕉久久网97 | 久久国产精品-国产精品| 国产免费久久精品99re丫y| 久久综合精品国产一区二区三区| 久久99国产精品99久久| 久久久久免费精品国产| 久久精品一区二区| 99久久精品国产一区二区三区| 久久久久免费精品国产| 国内精品久久久久久麻豆| 国产香蕉97碰碰久久人人| 久久精品国产黑森林| 亚洲精品无码专区久久同性男|