دروستکردنی گەڕانی خێرا لە ڤیژوەڵ بەیسك

لەم وانەیەدا باس لە دروستکردنی گەڕانی خێرا دەکەم بۆ وێبگەڕ .
دوای ئەوەی لە وانەی یەکەمدا وێبگەڕێکی سادەمان دروستکرد لەم وانەیەدا باس لە چۆنێتی زیادکردنی گەڕانی خێرا دەکەیم بۆی، کە تیایدا بەکارهێنەر دەتوانێت لە (Google, Bing, Yahoo, Wikipedia, Youtube) بە دوای دەستەواژەدا بگەڕێت .

بۆ دروستکردنی گەڕانی خێرا مەرج یان ئەگەر(if) بەکاردێنین کە بریتیە لە ئەگەر گۆگڵ دیاریکرابێت بچێت بۆ ناونیشانێك ... کلیك لە "بینینی کۆدی بەکارهاتوو" بکە بۆ بەدەستهێنانی کۆدەکان هەروەها بەوردی تەماشای وانە فێرکاریەکە بکە .

کۆدی بەکارهاتوو:
If google.Checked = True Then
            WebBrowser1.Navigate("https://www.google.iq/search?q=" + TextBox1.Text)
        ElseIf yahoo.Checked = True Then
            WebBrowser1.Navigate("http://maktoob.search.yahoo.com/search;_ylt=A7x9QX4RWatRNGQASArTlQx.?p=" + TextBox1.Text + "&fr2=sb-top&fr=sfp")
        ElseIf bing.Checked = True Then
            WebBrowser1.Navigate("http://www.bing.com/search?q=" + TextBox1.Text + "&go=&qs=n&form=QBRE&filt=all&pq=aaaaaaaaa&sc=0-2&sp=-1&sk=")
        ElseIf wikipedia.Checked = True Then
            WebBrowser1.Navigate("http://en.wikipedia.org/wiki/" + TextBox1.Text)
        ElseIf youtube.Checked = True Then
            WebBrowser1.Navigate("http://www.youtube.com/results?search_query=" + TextBox1.Text + "&gs_l=youtube.3..0l10.33574.34029.0.34360.4.4.0.0.0.0.310.842.1j0j2j1.4.0...0.0...1ac.1.11.youtube.BMdQFkJkZKc")
        End If


دروستکردنی گەڕانی خێرا لە ڤیژوەڵ بەیسك


بڵاوکردنەوەی ئەم بابەتە

فەیس بووكتویتەرگۆگڵ+


خەندەکانشاردنەوە