利用Visual Studio.net的宏快速添加注释

Sub AddNew()
        With DTE.ActiveDocument.Selection
            .Text = "//******************************************************************************* "
            .NewLine()
            .Text = "//*  名　　称： "
            .Text = DTE.ActiveDocument.ProjectItem().Document.Name().Substring(0, DTE.ActiveDocument.ProjectItem().Document.Name().Length - 3)
            .NewLine()
            .Text = "//*  版　　本： 2.4.5"
            .NewLine()
            .Text = "//*  描    述： "
            .NewLine()
            .Text = "//*  版    权： 北京XXXXX有限公司"
            .NewLine()
            .Text = "//*  程序设计： Winform (winform@hotmail.com)"
            .NewLine()
            .Text = "//*  开发日期： "
            .Text = System.DateTime.Now.ToString()
            .NewLine()
            .Text = "//*  修 改 人： "
            .NewLine()
            .Text = "//*  修改日期： "
            .NewLine()
            .Text = "//******************************************************************************* "
        End With
    End Sub
    Sub Modify()
        With DTE.ActiveDocument.Selection
            .Text = "//*************   修改  ********************************************************* "
            .NewLine()
            .Text = "//*  修改目的： "
            .NewLine()
            .Text = "//*  修 改 人： Winform (winform@hotmail.com)"
            .NewLine()
            .Text = "//*  修改日期： "
            .Text = System.DateTime.Now.ToString()
            .NewLine()
            .Text = "//******************************************************************************* "
        End With
    End Sub

东创贤胜科技: Not Found