VC++6.0 多行注释/取消注释 快捷键

目前学习C/C++，我常用的几个IDE：VC++6.0，DEV C++，visual studio。比较频繁的操作是 多行加注释。

每个IDE的快捷键不同，

1. DEV C++：ctrl+/ ，取消注释同样
2. visual studio：ctrl+K —> ctrl+C ，取消注释：ctrl+K —> ctrl+U

而在VC6.0中没有自带的快捷键，需要自行设置。
百度了一下设置方法，如下。

VC6.0如何设置多行注释快捷键？

这里，我们用VBScript脚本来添加这个功能。

1.首先，打开VC++6.0，选择File->New->Macro file。

2.点击确定，填写相应的描述。

3.输入代码，点击保存，关闭VC++6.0。（代码见后面）

这样就在文件夹中生成了一个 .dsm 文件。

4.打开一个C++文件，tools->customize。
5.选择 Add-ins and Macro Files -> Browse选择node.dsm。

6. 勾上node。
7. 选择 Command -> Category ，选择 Macros 。
8. 将 鼠标 按住 SetSelNote ，将其拖到工具栏中，会弹出下面的对话框。
9. CancelSelNote的做法与SetSelNote一样。
10.最后在工具栏中，就出现了你自己定义的批量注释和消除批量注释的图标了。

文中的代码：

'------------------------------------------------------------------------------
'FILE DESCRIPTION: 为开发环境添加批量注释或取消注释
'------------------------------------------------------------------------------

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

【转自 https://www.cnblogs.com/qiulidong/p/11736982.html】