'Declaramos los parametros de entrada y de salida Dim parametroEntrada As New ServiceReference1.CompositeType Dim parametroSalida As New ServiceReference1.CompositeType 'Declaramos el interfaz con los metodos a llamar y el la clase proxy Dim Iservicio As ServiceReference1.IService1 Dim servicio As New ServiceReference1.Service1Client 'Asignamos al interfaz el proxy Iservicio = servicio parametroEntrada.StringValue = "hola mundo!" 'Hacemos la llamada a través del interfaz parametroSalida = Iservicio.GetDataUsingDataContract(parametroEntrada) MessageBox.Show(parametroSalida.StringValue)
|