设置批量注释

Visual C++ 6.0开发环境虽然提供了丰富的功能，但是也有不尽人意之处。例如，它没有提供批量注释和取消批量注释的功能。但是，Visual C++ 6.0开发环境的设计者还是非常有远见的，提供了一些接口允许用户扩充开发环境的功能。例如，可以使用VB Script脚本来添加新的功能。本实例将介绍使用VB Script脚本实现批量注释和取消批量注释的功能，批量注释效果如图1.49所示。

（1）在Visual C++ 6.0中选择File→New命令，打开New窗口，选择Files选项卡，如图1.50所示。

（2）在列表中选择Macro File选项，在File文本框中输入文件名称，单击OK按钮创建宏文件，弹出New Macro File窗口，如图1.51所示。

（3）在Description备注框中输入宏文件的描述信息，单击OK按钮创建宏文件。此时，在代码编辑器中将创建一个宏文件窗口，如图1.52所示。

 
 

  
  
SubSetSelNote()'SunDESCRIPTION:过程SetSelNote用于使选中的文本成为注释 
  
  
dimCurWin'当前获得的窗口 
  
  
setCurWin=ActiveWindow
  
  
ifCurWin.type<>"Text"Then'判断当前窗口是否是文本窗口 
  
  
MsgBox"当前窗口不是代码窗口" 
  
  
else 
  
  
NoteType="//"
  
  
BeginLine=ActiveDocument.Selection.TopLine 
  
  
EndLine=ActiveDocument.Selection.BottomLine 
  
  
ifEndLine<BeginLinethen 
  
  
Line=BeginLine
  
  
BeginLine=EndLine
  
  
EndLine=Line 
  
  
else 
  
  
forrow=BeginLineToEndLine 
  
  
ActiveDocument.Selection.GoToLinerow 
  
  
ActiveDocument.Selection.SelectLine'选中当前行 
  
  
ActiveDocument.Selection=NoteType+ActiveDocument.Selection 
  
  
Next 
  
  
Endif 
  
  
Endif 
  
  
EndSub 
  
  
SubCancelSelNote() 
  
  
dimCurWin'当前获得的窗口 
  
  
setCurWin=ActiveWindow
  
  
ifCurWin.type<>"Text"Then'判断当前窗口是否是文本窗口 
  
  
MsgBox"当前窗口不是代码窗口" 
  
  
else 
  
  
BeginLine=ActiveDocument.Selection.TopLine 
  
  
EndLine=ActiveDocument.Selection.BottomLine 
  
  
ifEndLine<BeginLinethen 
  
  
Line=BeginLine
  
  
BeginLine=EndLine
  
  
EndLine=Line 
  
  
else 
  
  
forrow=BeginLineToEndLine 
  
  
ActiveDocument.Selection.GoToLinerow 
  
  
ActiveDocument.Selection.SelectLine'选中当前行 
  
  
SelBlock=ActiveDocument.Selection 
  
  
Trim(SelBlock) 
  
  
pos=instr(SelBlock,"//") 
  
  
ifpos<>0then 
  
  
RightRightBlock=Right(SelBlock,Len(SelBlock)-2) 
  
  
ActiveDocument.Selection=RightBlock
  
  
EndIf 
  
  
Next 
  
  
Endif 
  
  
Endif 
  
  
EndSub 
 
 

（5）保存宏文件。选择Tools→Customize命令打开Customize对话框，选择Add-ins and Macro Files选项卡，如图1.53所示。

（6）单击Browse按钮，打开浏览对话框，选择之前创建的宏文件，此时会发现它将显示在Add-ins and macro列表中，如图1.54所示。

（7）切换到Commands选项卡，在Category下拉列表框中选择Macros选项，在右侧的列表中会显示当前宏文件中定义的命令，如图1.55所示。

（9）在Button Appearance窗口中选中Image only单选按钮，在Images群组框中为按钮选择一个图标，单击OK按钮完成工具栏设置。

（10）按照步骤（7）～（9）的方法将图1.55中的另一个宏命令添加到工具栏中。

（11）在代码编辑框中选中多行代码，单击工具栏中的宏命令按钮，便会发现这些代码被注释了。

心法领悟015：恢复批量注释的代码。

如果要恢复被批量注释的代码，首先选中注释掉的代码，然后单击工具栏中的另一个宏命令按钮，就会发现这些代码取消了注释。

http://book.51cto.com/art/201101/242717.htm