VC++6.0注释快捷键设置和显示代码行号

在Qt Creator，eclipse等编辑器中，都默认有注释代码的快捷键：Ctrl + /。

注释快捷键在程序编程当中的作用相当明显，提高了编程效率。我在网上找到了一个在VC++6.0工具中添加注释快捷键的方法，VC++6.0是以VB为脚本来配置的。

首先，找到VC++6.0的安装路径，假设在：D:\Program Files (x86)\Microsoft Visual Studio 6.0，那么进入到Common\MSDev98\Macros目录下，全路径为：D:\Program Files (x86)\Microsoft Visual Studio 6.0\Common\MSDev98\Macros。

在该目录新建一个文本文件，并重命名为：comment.dsm，并打开增加以下内容：

Sub CustomCommentOut()
'DESCRIPTION: 注释/取消注释宏，可处理VB和C++、Java注释
<span style="white-space:pre">	</span>Dim win
<span style="white-space:pre">	</span>set win = ActiveWindow
<span style="white-space:pre">	</span>If win.type <> "Text" Then
<span style="white-space:pre">	</span>  MsgBox "This macro can only be run when a text editor window is active."
<span style="white-space:pre">	</span>Else
<span style="white-space:pre">		</span>TypeOfFile = 3
<span style="white-space:pre">		</span>If TypeOfFile > 0 And TypeOfFile < 6 Then
<span style="white-space:pre">			</span>If TypeOfFile > 3 Then
<span style="white-space:pre">				</span>CommentType = "'"<span style="white-space:pre">	</span>' VB注释
<span style="white-space:pre">				</span>CommentWidth = 1
<span style="white-space:pre">			</span>Else
<span style="white-space:pre">				</span>CommentType = "//"<span style="white-space:pre">	</span>' C++、java 注释
<span style="white-space:pre">				</span>CommentWidth = 2
<span style="white-space:pre">			</span>End If
<span style="white-space:pre">		</span> 
<span style="white-space:pre">			</span>StartLine = ActiveDocument.Selection.TopLine
<span style="white-space:pre">			</span>EndLine = ActiveDocument.Selection.BottomLine
<span style="white-space:pre">			</span>If EndLine < StartLine Then
<span style="white-space:pre">				</span>Temp = StartLine
<span style="white-space:pre">				</span>StartLine = EndLine
<span style="white-space:pre">				</span>EndLine = Temp
<span style="white-space:pre">			</span>End If
<span style="white-space:pre">			</span>' 单行
<span style="white-space:pre">			</span>If EndLine = StartLine Then
<span style="white-space:pre">				</span>ActiveDocument.Selection.StartOfLine dsFirstColumn
<span style="white-space:pre">				</span>ActiveDocument.Selection.CharRight dsExtend, CommentWidth
<span style="white-space:pre">				</span>If ActiveDocument.Selection = CommentType Then
<span style="white-space:pre">					</span>ActiveDocument.Selection.Delete
<span style="white-space:pre">				</span>Else
<span style="white-space:pre">					</span>ActiveDocument.Selection.StartOfLine dsFirstText
<span style="white-space:pre">					</span>ActiveDocument.Selection.CharRight dsExtend, CommentWidth
<span style="white-space:pre">					</span>If ActiveDocument.Selection = CommentType Then
<span style="white-space:pre">						</span>ActiveDocument.Selection.CharRight dsExtend
<span style="white-space:pre">						</span>ActiveDocument.Selection.Delete
<span style="white-space:pre">					</span>Else
<span style="white-space:pre">						</span>ActiveDocument.Selection.StartOfLine dsFirstText
<span style="white-space:pre">						</span>ActiveDocument.Selection = CommentType + vbTab + _
                                        ActiveDocument.Selection
<span style="white-space:pre">					</span>End If
<span style="white-space:pre">				</span>End If
<span style="white-space:pre">			</span>' 多行
<span style="white-space:pre">			</span>Else
<span style="white-space:pre">				</span>For i = StartLine To EndLine
<span style="white-space:pre">					</span>ActiveDocument.Selection.GoToLine i
<span style="white-space:pre">					</span>CommentLoc = dsFirstColumn
<span style="white-space:pre">					</span>ActiveDocument.Selection.StartOfLine CommentLoc
<span style="white-space:pre">					</span>ActiveDocument.Selection.CharRight dsExtend, CommentWidth
<span style="white-space:pre">					</span>If ActiveDocument.Selection = CommentType Then
<span style="white-space:pre">						</span>ActiveDocument.Selection.Delete
<span style="white-space:pre">					</span>Else
<span style="white-space:pre">						</span>ActiveDocument.Selection.StartOfLine CommentLoc
<span style="white-space:pre">						</span>ActiveDocument.Selection = CommentType + _
                                                  ActiveDocument.Selection
<span style="white-space:pre">					</span>End If
<span style="white-space:pre">				</span>Next
<span style="white-space:pre">			</span>End If
<span style="white-space:pre">		</span>Else
<span style="white-space:pre">			</span>MsgBox("Unable to comment out the highlighted text" + vbLf + _
<span style="white-space:pre">				</span>"because the file type was unrecognized." + vbLf + _
<span style="white-space:pre">				</span>"If the file has not yet been saved, " + vbLf + _
<span style="white-space:pre">				</span>"please save it and try again.")
<span style="white-space:pre">		</span>End If
<span style="white-space:pre">	</span>End If
End Sub

此时打开VC++6.0窗口，以下步骤：

1.打开菜单栏"Tools" -> "Customize" 打开了"Customize"对话框。

2.

3.

4.在代码中，只需要选中代码或者在光标所在行，执行快捷键"Ctrl + /"，进行注释或取消注释。

VC6.0是一款比较稳定的功能强大的IDE，目前也有很多人在使用。但美中不足的是它不能像其他IDE那样显示行号。

这里需要用到一个插件VC6LineNumberAddin，下载地址：http://files.cnblogs.com/emanlee/VC6LineNumberAddin.rar(这是EmamLee上传的，感谢)。

使用步骤：

1.将文件中的VC6LineNumberAddin.dll拷贝到目录C:\Program Files\Microsoft Visual Studio\Common\MSDev98\AddIns；

2.打开vc6，菜单栏：Tools -> customize -> Add-ins and Macro Files 
   选中VC6LineNumber Developer Studio Add-in

3.注册，双击VC6LineNumberAddin.reg进行注册。如果不进行注册也可以使用，不过最多只能显示500行