تغيير صفحة البحث - مكتبة أكواد VB.NET

Public Sub SetSearchPage(ByVal URL As String)
       If URL = Nothing Then
           MsgBox("لم تقم بوضع مسار", MsgBoxStyle.Critical, "خطأ")
       Else
           My.Computer.Registry.SetValue("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main", "Search Page", URL)
       End If
   End Sub