利用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