Network Remote VB.Net

Imports System.Text.RegularExpressions
Imports System.Net
Module Example
   Public Sub Main()
        Dim myWebPermission1 As New WebPermission()
        myWebPermission1.AddPermission(NetworkAccess.Connect, New Regex("http://www\.domain\.com/.*", RegexOptions.Compiled Or RegexOptions.IgnoreCase Or RegexOptions.Singleline))
        myWebPermission1.Demand()
   End Sub
End Module