Dim loBasicHttpBinding As System.ServiceModel.BasicHttpBinding = New System.ServiceModel.BasicHttpBinding()

        loBasicHttpBinding.Security.Mode = System.ServiceModel.BasicHttpSecurityMode.Transport

        Dim loEndpointAddress As System.ServiceModel.EndpointAddress = New System.ServiceModel.EndpointAddress(lcUrl)

        Dim loMyService As MyService.MyServiceSoapClient = New MyService.MyServiceSoapClient(loBasicHttpBinding, loEndpointAddress)