在VC6.0开发环境中添加批量注释和取消注释

最新推荐文章于 2022-03-23 19:17:14 发布

yuzhoufeng888

最新推荐文章于 2022-03-23 19:17:14 发布

阅读量2.4k

点赞数 1

分类专栏： C/C++ 文章标签： file vbscript button macros 工具 command

本文链接：https://blog.csdn.net/yuzhoufeng888/article/details/6031227

版权

C/C++ 专栏收录该内容

2 篇文章 0 订阅

订阅专栏

学习Visual C++开发实战宝典之总结

1、在Visual C++6.0中选择File/New命令，打开New选项卡；

2、在列表中选择Macro File选项，在File编辑框中输入文件名称（如Command），单击OK按钮创建宏文件，弹出New Macro File（新建宏文件）窗口；

3、在Description备注框中输入宏文件的描述信息（如：为开发环境添加批量注释或取消注释），单击OK按钮创建宏文件。此时，在代码编辑器中将创建一个宏文件窗口；

4、向宏文件中添加两个子过程，语言为VBScript；

'------------------------------------------------------------------------------ '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

5、保存宏文件。选择Tools/Customize命令，打开Customize（自定义）对话框，选择Add-ins and Macro File（附加项和宏文件）选项卡；

6、单击Browse（浏览）按钮，打开浏览对话框，选择之前创建的宏文件，此时会发现它显示在Add-ins and Macro File列表中；

7、切换到Commands选项卡，在Category（类别）组合框中选择Macros选项，在右侧的列表中会显示当前宏文件中定义的命令；

8、在Commands列表中选中宏命令，将其拖动到工具栏中，此时弹出Button Appearance窗口；

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

10、按照步骤7~9的方法将另一个宏命令添加到工具栏中；

OK，大功告成！