04-05-13, 02:52 PM
السلام عليكم ورحمة الله وبركاته
تفضل أخي الكريم
بالتوفيق
تفضل أخي الكريم
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text <> "" Then
If RadioButton1.Checked Then
Process.Start("https://www.google.com.sa/search?q=" & TextBox1.Text)
ElseIf RadioButton2.Checked Then
Process.Start("http://maktoob.search.yahoo.com/search?p=" & TextBox1.Text)
Else
Process.Start("http://www.bing.com/search?q=" & TextBox1.Text)
End If
End If
End Subبالتوفيق

