- Katılım
- 5 Ocak 2014
- Mesajlar
- 3,333
- Tepkime puanı
- 6
- Puanları
- 136
Bu dersimizde tek satır ile Google yapımını göstereceğim..
Gerekli olanlar:
1 adet textbox
1 adet button
Kod:
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
Gerekli olanlar:
1 adet textbox
1 adet button
Kod:
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