使用Visual Studio宏給代碼檔案自動添加檔案頭

一般來說代碼檔案都要有個文檔頭，帶有著作權聲明和協助資訊等。我以前都是用CtrlC，CtrlV來做，後來研究了一下網上的資料，發現用宏來完成這個任務比較方便。

在工具菜單中選擇宏->宏IDE，在宏編輯器中添加新項，選擇模組，嗯，模組名字就叫做"AddDocumentHeader"吧。

編輯代碼內容如下：

Imports System
Imports EnvDTE
Imports EnvDTE80
Imports EnvDTE90
Imports EnvDTE90a
Imports EnvDTE100
Imports System.Diagnostics

Public Module AddDocumentHeader
    Sub AddDocumentHeader()
        Dim document As Document
        document = DTE.ActiveDocument
        document.Selection.StartOfDocument()
        document.Selection.GotoLine(2, True)
        Dim content As String = document.Selection.Text
        '通過比較代碼第二行著作權資訊字串判斷是否需要添加檔案頭.
        Dim copyrightInformation As String = "Copyright (c) xwingyz(at)gmail.com. All right reserved."
        Dim ms = " * " + copyrightInformation
        Dim Found = String.Compare(content, ms)
        If (Found <> 0) Then
            document.Selection.StartOfDocument()
            document.Selection.LineUp()
            document.Selection.Text = "/* -----------------------------------------------------------------------------"
            document.Selection.NewLine()
            document.Selection.Text = copyrightInformation
            document.Selection.NewLine()
            document.Selection.NewLine()
            document.Selection.NewLine()
            document.Selection.Text = "$LastChangedBy$"
            document.Selection.NewLine()
            document.Selection.Text = "$LastChangedDate$"
            document.Selection.NewLine()
            document.Selection.Text = "$LastChangedRevision$"
            document.Selection.NewLine()
            document.Selection.Text = "-----------------------------------------------------------------------------"
            document.Selection.NewLine()
            document.Selection.Text = "/"
            document.Selection.NewLine()
        End If
    End Sub
End Module

 儲存，退出。

 開啟一個代碼檔案，選擇工具菜單中宏->Macro資源管理員，選擇剛剛建立的模組AddDocumentHeader右鍵菜單上選擇運行，看看代碼中是否自動添加了檔案頭？再執行一次看看是不是沒有重複添加？不出意外的話一切OK。

 

下一步是要給這個宏分配一個快速鍵，這樣就更方便了。

找到工具菜單中選項->鍵盤選項， 在過濾框中輸入AddDocumentHeader，看到你剛剛建立的宏了吧？ 趕緊分配一個你喜歡快速鍵吧。