首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > 编程 >

给Visual Studio 平添宏工具条

2013-02-24 
给Visual Studio 添加宏工具条 给Visual Studio添加一个工具条,工具条中实现两个功能(有两个按钮):1,插入

给Visual Studio 添加宏工具条

 

给Visual Studio添加一个工具条,工具条中实现两个功能(有两个按钮):1,插入分割线(简单);2,添加文件注释(复杂)。来说明本文:给Visual Studio 添加宏工具条

给Visual Studio 平添宏工具条

1)  打开VisualStudio的宏管理器:工具-宏-Macros资源管理器,点击【宏】,右键新建宏项目(名字为MyMacros),完成后,右键点击【MyMacros】-新建模块,名字为:Comment

 给Visual Studio 平添宏工具条

给Visual Studio 平添宏工具条

拷贝下面的代码:注意(Public ModuleComment的意思是:刚才新建的模块的名字是:Commnet;然后添加了两个函数:Split和File分别代表:插入分割线和插入文件注释),然后保存。

 

 

ImportsSystem

ImportsEnvDTE

ImportsEnvDTE80

ImportsEnvDTE90

ImportsEnvDTE90a

ImportsEnvDTE100

ImportsSystem.Diagnostics

Public Module Comment

'华丽的分割线

   Sub Split()

       DTE.ActiveDocument.Selection.NewLine()

        DTE.ActiveDocument.Selection.Text = "//----------------------------------华丽的分割线----------------------------------//"

       DTE.ActiveDocument.Selection.NewLine()

   End Sub

   '文件

   Sub FILE()

       DTE.ActiveDocument.Selection.Text = "/******************************************************************************"

       DTE.ActiveDocument.Selection.NewLine()

       DTE.ActiveDocument.Selection.Indent()

       DTE.ActiveDocument.Selection.Text = "文件名称: "+ DTE.ActiveDocument.Name.ToString()

       DTE.ActiveDocument.Selection.NewLine()

       DTE.ActiveDocument.Selection.Text = "作   者: " + Environ("USERNAME")

       DTE.ActiveDocument.Selection.NewLine()

       DTE.ActiveDocument.Selection.Text = "创建时间: "+ System.DateTime.Now.ToLocalTime()

       DTE.ActiveDocument.Selection.NewLine()

       DTE.ActiveDocument.Selection.Text = "文件描述:"

       DTE.ActiveDocument.Selection.NewLine()

       DTE.ActiveDocument.Selection.Text = "版权声明: Copyright(C) XXX Technologies Inc. AllRights Reserved "

       DTE.ActiveDocument.Selection.NewLine()

       DTE.ActiveDocument.Selection.Text = "修改历史: N/A"

       DTE.ActiveDocument.Selection.NewLine()

       DTE.ActiveDocument.Selection.DeleteLeft()

       DTE.ActiveDocument.Selection.Text = "*******************************************************************************/"

End Sub

End Module

2)  开始做自己的工具条了:开始-自定义

给Visual Studio 平添宏工具条

新建一个工具栏,如新建一个:A宏,切换到命名Tab页,如下图,添加命令

给Visual Studio 平添宏工具条

这样就形成了一个名字为:A宏的工具条。

3)  将工具条,添加到Visual的界面上。

视图-工具栏,然后找到自己的刚刚定义的A宏工具条就可以了。

 

多分享,多受益。

我为人人,人人为我。

赠人玫瑰,手留余香。

 

热点排行