Imports System.Data

Module DataHandlerTester

    Sub Main()

        Dim dh As New ObjectDataHandler.DataHandler

        Dim ds As DataSet = dh.GetCustomer(938472)

        For Each o As Object In ds.Tables(0).Rows(0).ItemArray

            Console.WriteLine(o.ToString())
        Next

        Console.ReadLine()

    End Sub

End Module