Advertisement
Guest User

Quick Search Engine Code

a guest
Feb 23rd, 2013
127
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.76 KB | None | 0 0
  1. Public Class Form1
  2. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  3. If TextBox1.Text.Contains(" ") Then
  4. TextBox1.Text.Replace(" ", "+")
  5. End If
  6. Web.WebBrowser1.Navigate("https://www.google.com.ph/#hl=en&tbo=d&output=search&sclient=psy-ab&q=" + TextBox1.Text + "&gs_l=hp.3..0i20l2j0l2.1874.3306.0.3471.11.7.0.4.4.4.747.2747.0j2j2j5-2j1.7.0.les%3B..0.0...1c.1.BnLxjGYJlWY&pbx=1&bav=on.2,or.r_gc.r_pw.r_qf.&bvm=bv.1355534169,d.aGc&fp=8d2b0a948f22722c&bpcl=40096503&biw=1517&bih=752")
  7. Web.Show()
  8. Me.Hide()
  9. End Sub
  10. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
  11. Me.Close()
  12. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement