Listado 9.10
Declaración del servicio web
como origen de datos de un control DataGrid.
Private Sub Button1_Click(ByVal sender As
System.Object, ByVal e _
As System.EventArgs) Handles Button1.Click
Dim wsBC As New localhost.Service1()
Dim ds As New DataSet()
ds =
wsBC.BuscarClientes
DataGrid1.DataSource = ds.Tables(0)
End Sub