为Visual C++ 6.0添加批量注释和取消批量注释功能

首先在Visual C++ 6.0的安装目录下“Microsoft Visual Studio\Common\MSDev98\Macros”中新建一个txt文件，复制如下代码到文件中：

Sub SetSelNote() 'Sun DESCRIPTION: 过程 SetSelNote 用于使选中的文本成为注释'
 dim CurWin '当前获得的窗口
 set CurWin=ActiveWindow
 if CurWin.type<>"Text" Then '判断当前窗口是不是文本窗口
         MsgBox"当前窗口不是代码窗口"
 else
         NoteType="//"
           BeginLine=ActiveDocument.Selection.TopLine
           EndLine=ActiveDocument.Selection.BottomLine
         if EndLine<BeginLine then
                 Line=BeginLine
                 BeginLine=EndLine
                 EndLine=Line
         else
             for row=BeginLine to EndLine
                  ActiveDocument.Selection.GoToLine row
                  ActiveDocument.Selection.SelectLine '选中当前行
                  ActiveDocument.Selection=NoteType+ActiveDocument.Selection
             next
         end if
 end if
 end Sub
 
 Sub CancelSelNote()
 dim CurWin '当前获得的窗口
 set CurWin=ActiveWindow
 if CurWin.type<>"Text" then '判断当前窗口是否是文本窗口
     MsgBox"当前窗口不是代码窗口"
 else
     BeginLine=ActiveDocument.Selection.TopLine
     EndLine=ActiveDocument.Selection.BottomLine
    if EndLine<BeginLine then
         Line=BeginLine
         BeginLine=EndLine
         EndLine=Line
     else
         for row=BeginLine to EndLine
              ActiveDocument.Selection.GoToLine row
              ActiveDocument.Selection.SelectLine '选中当前行
              SelBlock=ActiveDocument.Selection
              Trim(SelBlock)
              pos=instr(SelBlock,"//")
              if pos<>0 then
                     RightBlock=Right(SelBlock,Len(SelBlock)-2)
                     ActiveDocument.Selection=RightBlock
             end if
     next
 end if
 end if
 end Sub

然后把文件保存为Comment.dsm，注意文件后缀为dsm，文件类型也要更改。

打开VC6.0，Tools-Customize

打开Add-ins and Macro Files标签页，在下面勾上刚刚新建的文件名Comment，如果没有，点击下面的Browse找到自己保存的文件。

打开Commands标签页，下拉Category找到Macros，右边会出现CancelSelNote和SetSelNote，分别代表取消注释和添加注释的功能。

用左键选中CancelSelNote或SetSelNote不放，把它们拖动到工具栏上，然后放手，会弹出下面的对话框，让你给这个功能选择一个图标，可以随意选择，然后确定即可。

最后效果如下：

 

注意：

当你用【取消注释】这个功能时，它会删除选中行的前两个字符。。。

　　正常情况下，删除的是每一行前面“//”这两个字符，但是，有时候，你选中多行时，如果其中有1行是不带注释的，那么，它也会删除这行的前两个字符。自己可以慢慢试一下，就清楚了。

　　所以，在使用【 取消注释 】功能时，要慎用。