Kolay Google Yapımı

[alimania]

Bu dersimizde tek satır ile Google yapımını göstereceğim..

Gerekli olanlar:

1 adet textbox
1 adet button

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click         If TextBox1.Text = "google" Then             System.Diagnostics.Process.Start("www.google.com.tr")         End If         If TextBox1.Text = "facebook" Then             System.Diagnostics.Process.Start("www.facebook.com")         End If         If TextBox1.Text = "sanalkurs" Then             System.Diagnostics.Process.Start("www.sanalkurs.net")         End If         If TextBox1.Text = "hotmail" Then             System.Diagnostics.Process.Start("www.hotmail.com")         End If         If TextBox1.Text = "meteliksizler" Then             System.Diagnostics.Process.Start("www.meteliksizler.net")         End If end sub