将Google工具条添加到VS.NET中!
Google是我们使用最为普遍的搜索引擎,我们怎么把它内置到VS.NET中那?这里用到了Visual Studio .NET 的宏,利用这个可以实现内置Google工具条嵌在VS.NET中.
在VS.NET的宏编辑器(alt+F11打开)中新建一个Modle（MyMacros工程中）,代码如下: Search.VB
Imports EnvDTE
Imports System.Diagnostics
Imports System.Windows.Forms
Imports System.Globalization
Public Module Search
Public Sub Google()
NavigateTo("http://www.google.com/search?q={0}")
End Sub
Private Sub NavigateTo(ByVal url As String)
Dim selection As String = DTE.ActiveDocument.Selection.Text
If selection.Length > 0 Then
DTE.ItemOperations.Navigate(String.Format(CultureInfo.InvariantCulture, url, selection), vsNavigateOptions.vsNavigateOptionsNewWindow)
Else
MessageBox.Show("No search text selected.")
End If
End Sub
End Module
Imports System.Diagnostics
Imports System.Windows.Forms
Imports System.Globalization
Public Module Search
Public Sub Google()
NavigateTo("http://www.google.com/search?q={0}")
End Sub
Private Sub NavigateTo(ByVal url As String)
Dim selection As String = DTE.ActiveDocument.Selection.Text
If selection.Length > 0 Then
DTE.ItemOperations.Navigate(String.Format(CultureInfo.InvariantCulture, url, selection), vsNavigateOptions.vsNavigateOptionsNewWindow)
Else
MessageBox.Show("No search text selected.")
End If
End Sub
End Module
将这个宏添加到工具条中.
具体的操作参考: dotnetjunkies上的Add a search engine toolbar to VS.NET
支持中文:
DTE.ItemOperations.Navigate(String.Format(CultureInfo.InvariantCulture, url, System.Web.HttpUtility.UrlPathEncode(selection)), vsNavigateOptions.vsNavigateOptionsNewWindow)
具体的操作参考: dotnetjunkies上的Add a search engine toolbar to VS.NET
支持中文:
DTE.ItemOperations.Navigate(String.Format(CultureInfo.InvariantCulture, url, System.Web.HttpUtility.UrlPathEncode(selection)), vsNavigateOptions.vsNavigateOptionsNewWindow)
浙公网安备 33010602011771号
评论
这个例子的目的是两个:了解VS.NET中的宏,自定义VS.NET工具条和Happy!
如果说是实用的话,还是Google的ToolBar用到最方便!^_^
我点 “宏IDE...” 报错， 说 “系统找不到指定的文件”，请问什么原因？
支持中文可以修改 NavigateTo函数为:在引用中添加system.web
Dim selection As String = DTE.ActiveDocument.Selection.Text
If selection.Length > 0 Then
DTE.ItemOperations.Navigate(String.Format(CultureInfo.InvariantCulture, url, System.Web.HttpUtility.HtmlEncode(selection)), vsNavigateOptions.vsNavigateOptionsNewWindow)
Else
MessageBox.Show("No search text selected.")
End If
End Sub
我没装 MSDN
我想不是没有安装MSDN的问题,因为我也没有安装MSDN,但是我的运行正常.还是最好将你的VS.NET修复安装吧!
IT公司速查手册
http://www.seeitco.com
供各公司评论和排名,有点意思．
欢迎大家进行评论,我们要让差的工司,爆露出来.
前一段时间由于数据丢失,于今日已全部找回,共有近6500多家公司入驻，评论数多达10万多条。本站永久域名为(www.seeitco.com)
说“HttpUtility”不是web的成员
我找了半天没找到
在你的menubar上右键点击customize,在这种状态下右键点击你要编辑的munubutton,name:编辑你的名字,paste button image:粘贴你复制的图标.(copy your icon)