*

clsPetCare Code for Aggregation Mini-Lecture: Day 4

Option Explicit
Private mAttentions As String
Private mVetVisitations As String
Public Property Get Attentions() As String
    mAttentions = "Animal will need to be petted a lot and made a fuss over"
    Attentions = mAttentions
End Property

Public Property Get VetVisitations() As String
    mVetVisitations = "Animal will need to get shots and checked for parasites"
    VetVisitations = mVetVisitations
End Property

Internet Content Rating Association

Alrak's Course Resources ©2002-2007 Karla Carter. All rights reserved. This material (including, but not limited to, Mini-lectures and Challenge Labs) may not be reproduced, displayed, modified or distributed without the express prior written permission of the copyright holder. For permission, contact Karla.