VC++6.0注释快捷键设置

http://blog.csdn.net/gzshun/article/details/7782458

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

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

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