ブラウザを開かずに検索するには？ (ID:118420)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 オレもかなり素人なので、素人なりに頑張ってみたぞ(orz しかも、ブラウザを開かずにを無視(ぇ …IE.Visible=Trueをコメントアウトすればソレっぽいが… やっぱりIEオブジェクト使ってるうちは表示してたほうが無難だろうと思ってな。 VB6＆IE6辺りで動くかもしれない。 Option Explicit Dim IE As Object Private Sub Command1_Click() SyncNavigate "http://www.google.ne.jp" IE.Document.All.Item("q").Value = Text1.Text Call IE.Document.Forms.Item(0).submit End Sub Private Sub Form_Load() Set IE = CreateObject("InternetExplorer.Application") IE.Visible = True Text1.Text = "検索する文字列" End Sub Sub SyncNavigate(ByVal URL As String) IE.Navigate URL Call LoopWhileBusy End Sub Sub LoopWhileBusy() Do DoEvents Loop While IE.Busy End Sub Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) IE.Quit End Sub ※そういえば…結構この手の話題ってあるよなぁ…検索単語どういうの仕掛けた？ ＠誤爆詐称ちぅな人