VS2008使用宏记录来实现自动增加注释信息（转）

不管是做什么项目，代码里面的注释是必不可少的，其实一个好的程序员大部分的时间都是在给代码写注释，但是相同的注释不停的写也是件比较麻烦的事儿，在VS2008里面通过宏可以记录下注释信息，产生一个注释文件，每次需要的时候直接增加到类文件里面即可，方法如下：

 Sub AddComment()
        Dim DocSel As EnvDTE.TextSelection
        DocSel = DTE.ActiveDocument.Selection
        DocSel.NewLine()
        DocSel.Text = "/*******************************************************************"
        DocSel.NewLine()
        DocSel.Text = "* 函数名称："
        DocSel.NewLine()
        DocSel.Text = "* 功    能："
        DocSel.NewLine()
        DocSel.Text = "* 作    者： "
        DocSel.NewLine()
        DocSel.Text = "* 博    客： "
        DocSel.NewLine()
        DocSel.Text = "* 电子邮箱： "
        DocSel.NewLine()
        DocSel.Text = "* 日    期：" + System.DateTime.Now.ToLongDateString()
        DocSel.NewLine()
        DocSel.Text = "*******************************************************************/"
    End Sub

转自
http://cache.baiducontent.com/c?m=9f65cb4a8c8507ed4fece763105392230e54f73260878e482a958448e435061e5a35bde5707e1207d0cf613441fe1307aea72b72350020aa98ca9549dda6922d2f8b2030730b8636489546f1df037881769f1ea8b81897baf23099b9d2a2c82256dd25036df0f49c297403cb1fe76234f4d5995f642c07cb9b&p=c361c64ad6c21cf41cbd9b7d0c14853c&newp=8e3ed115d9c040ad1ebe9b7e0c49cc205c5bc4387ebad7137992&user=baidu&fm=sc&query=VS2008+%D7%D4%B6%AF%D7%A2%CA%CD&qid=&p1=2