'Public Class quote ' Public Property line1() As String ' Get ' Return quotecustomer(1) ' End Get ' Set(ByVal value As String) ' quotecustomer(1) = value ' End Set ' End Property ' Public Property line2() As String ' Get ' Return quotecustomer(2) ' End Get ' Set(ByVal value As String) ' quotecustomer(2) = value ' End Set ' End Property ' Public Property line3() As String ' Get ' Return quotecustomer(3) ' End Get ' Set(ByVal value As String) ' quotecustomer(3) = value ' End Set ' End Property ' Public Property line4() As String ' Get ' Return quotecustomer(4) ' End Get ' Set(ByVal value As String) ' quotecustomer(4) = value ' End Set ' End Property ' Public Property number() As String ' Get ' Return quotenumber ' End Get ' Set(ByVal value As String) ' quotenumber = value ' End Set ' End Property ' Public Property dateissued() As String ' Get ' Return quotedate ' End Get ' Set(ByVal value As String) ' quotedate = value ' End Set ' End Property ' Public Property rep() As String ' Get ' Return quoterep ' End Get ' Set(ByVal value As String) ' quoterep = value ' End Set ' End Property ' Public Property shiptime() As String ' Get ' Return quoteshiptime ' End Get ' Set(ByVal value As String) ' quoteshiptime = value ' End Set ' End Property ' Public Property shipmethod() As String ' Get ' Return quoteshipmethod ' End Get ' Set(ByVal value As String) ' quoteshipmethod = value ' End Set ' End Property ' Public Property FOB() As String ' Get ' Return quoteFOB ' End Get ' Set(ByVal value As String) ' quoteFOB = value ' End Set ' End Property ' Public Property terms() As String ' Get ' Return quoteTerms ' End Get ' Set(ByVal value As String) ' quoteTerms = value ' End Set ' End Property 'End Class