Question

随意大声重写这个问题。

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

//MYINITIALS_REMOVE
/*if (this code is rubbish)
{
    comment it out;
}*/

我想创建一个功能，只需按一个按钮或按键组合，我就批量注释掉所选代码，并自动将我的标签放在开头。因此，开头评论不是'//'或'/ *'，而是'MYINITIALS_REMOVE //'或'MYINITIALS_REMOVE / *'

这可能吗？

编辑实际上在考虑它，我甚至不介意每一行都以'MYINITIALS_REMOVE //'开头。

Answer 1

我认为你正在寻找这个：

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

是否有一种简单的方法可以为个性化评论创建自定义VS操作？

1 个答案: