| robbie 的个人资料Gone with the Wind照片日志列表 | 帮助 |
|
3月30日 What's New in .Net 2.0 (1)Google Search Macro in VS2003
Public Module Search
Sub GoogleSearch()
Dim strUrl As String Dim selection As TextSelection = DTE.ActiveDocument.Selection() If (Not selection Is System.DBNull.Value) And (selection.Text <> "") Then strUrl = "www.google.com/search?q=" + selection.Text DTE.ExecuteCommand("View.URL", strUrl) Else MsgBox("Select Text first to Search") End If End Sub End Module
Google Search Macro in VS2005
Public Module Search
Sub GoogleSearch()
Dim strUrl As String
Dim selection As TextSelection = DTE.ActiveDocument.Selection() If Not String.IsNullOrEmpty(selection.Text) Then strUrl = "www.google.com/search?q=" + selection.Text DTE.ExecuteCommand("View.WebBrowser", strUrl) Else MsgBox("Select Text first to Search") End If End Sub
End Module 引用通告此日志的引用通告 URL 是: http://huwenhou.spaces.live.com/blog/cns!5075D9E3BCD139C!225.trak 引用此项的网络日志
|
|
|