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

لەم وانەیەدا باس لە دروستکردنی گەڕانی خێرا دەکەم بۆ وێبگەڕ .

دوای ئەوەی لە وانەی یەکەمدا وێبگەڕێکی سادەمان دروستکرد لەم وانەیەدا باس لە چۆنێتی زیادکردنی گەڕانی خێرا دەکەیم بۆی، کە تیایدا بەکارهێنەر دەتوانێت لە (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

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

ئەگەر دەتەوێت ئاگاداری نوێترین بابەتی ماڵپەری فێرکاری بیت لە تەلەگرام لەگەڵمان بە

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

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