Class Class1
   ' Define a local variable to store the property value.
Ans: Only One Property.   
example: 
Private PropertyValue As String
   ' Define the property.
 Public Property Prop1() As String
      Get
         ' The Get property procedure is called when the 
         ' value
         ' of a property is retrieved. 
         Return PropertyValue
      End Get
      Set(ByVal Value As String)
         ' The Set property procedure is called when the 
         ' value 
         ' of a property is modified. 
         ' The value to be assigned is passed in the 
         ' argument to Set. 
         PropertyValue = Value
      End Set
   End Property
End Class

The procedures that are described in the get method and 
that methods are given in the set method.