' Project RealEstate, source code file HousPoint.vb. ' Data for points of houses to plot in picture box. ' When user clicks on a house, the ID is retrieved to ' use in construction an SQL statement to obtain the rest ' of the information for the house. Public Class HousePoint Public X As Single Public Y As Single Public ID As Integer Public Sub New(ByVal XVal As Single, ByVal YVal As Single, _ ByVal i As Integer) X = XVal Y = YVal ID = i End Sub End Class