    <WebMethod()> Public Function GetDataSet() As DataSet
        Dim ds As New DataSet
        daCustomers.Fill(ds)
        Return ds
    End Function



    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ws As New localhost.SF_WebService
	' Dim obj as new MyClass
        Dim dsTemp As New DataSet
        dsTemp = ws.GetDataSet
        Dim intCount As Integer = dsTemp.Tables(0).Rows.Count
        Me.Text = intCount.ToString & " records returned"
        DataGrid1.DataSource = dsTemp
    End Sub