Visual studio 是否有一种简单的方法来创建个性化评论的自定义VS操作?

Visual studio 是否有一种简单的方法来创建个性化评论的自定义VS操作?,visual-studio,visual-studio-2010,macros,shortcuts,visual-studio-macros,Visual Studio,Visual Studio 2010,Macros,Shortcuts,Visual Studio Macros,请随意大量重复这个问题 基本上,我目前正在剥离一个非常大的框架的很大一部分-这涉及到很多评论。所以我可以在以后找到所有这些,我批量评论,然后在每个块之前复制粘贴一个标记,如下所示: //MYINITIALS_REMOVE /*if (this code is rubbish) { comment it out; }*/ 我想创建一个函数,这样只需按一个按钮或组合键,我就可以批量注释所选代码,并自动将标记放在开头。因此,开头的注释不是“//”或“/*”,而是“MYINITIALS\u R

请随意大量重复这个问题

基本上,我目前正在剥离一个非常大的框架的很大一部分-这涉及到很多评论。所以我可以在以后找到所有这些,我批量评论,然后在每个块之前复制粘贴一个标记,如下所示:

//MYINITIALS_REMOVE
/*if (this code is rubbish)
{
    comment it out;
}*/
我想创建一个函数,这样只需按一个按钮或组合键,我就可以批量注释所选代码,并自动将标记放在开头。因此,开头的注释不是“//”或“/*”,而是“MYINITIALS\u REMOVE//”或“MYINITIALS\u REMOVE/*”

这可能吗


实际上,仔细想想,我甚至不介意每一行都以“MYINITIALS_REMOVE/”开头。

我想你在找这个:

Public Sub CStyleComment()
    Dim selection As TextSelection = DTE.ActiveDocument.Selection
    selection.TopPoint.CreateEditPoint.Insert("//MYINITIALS_REMOV" & vbCrLf & "/*")
    selection.BottomPoint.CreateEditPoint.Insert("*/")
End Sub
Public Sub CStyleComment()
    Dim selection As TextSelection = DTE.ActiveDocument.Selection
    selection.TopPoint.CreateEditPoint.Insert("//MYINITIALS_REMOV" & vbCrLf & "/*")
    selection.BottomPoint.CreateEditPoint.Insert("*/")
End Sub
也许这个版本更适合自动翻译: