Public Class Customer

 

    Public Sub New()

    End Sub

 

    Public Sub New(ByVal Company, ByVal City, ByVal State)

        Me.Company = Company

        Me.City = City

        Me.State = State

    End Sub

 

    Private _Company As String

    Public Property Company()

        Get

            Return _Company

        End Get

        Set(ByVal value)

            _Company = value

        End Set

    End Property

 

    Private _City As String

    Public Property City()

        Get

            Return _City

        End Get

        Set(ByVal value)

            _City = value

        End Set

    End Property

 

    Private _State As String

    Public Property State()

        Get

            Return _State

        End Get

        Set(ByVal value)

            _State = value

        End Set

    End Property

 

    Public Shared Function GetCustomer() As DataTable

    End Function

 

    Public Shared Sub InsertUpdateCustomer(ByVal customer As Customer)

    End Sub

 

End Class