you often don’t want to give code outside an object direct access to the data in the object. Instead, you can use properties, which use methods to set or get an internal value. We saw how to do that in Chapter 3; here’s an example from that chapter where I’m adding a property to a module:
|
1 2 3 4 5 6 7 8 9 10 11 |
Module Module2
<span style="background-color: #d9d9d9">Private PropertyValue As String</span>
<span style="background-color: #d9d9d9">Public Property Prop1() As String</span>
<span style="background-color: #d9d9d9">Get</span>
<span style="background-color: #d9d9d9">Return PropertyValue</span>
<span style="background-color: #d9d9d9">End Get</span>
<span style="background-color: #d9d9d9">Set(ByVal Value As String)</span>
<span style="background-color: #d9d9d9">PropertyValue = Value</span>
<span style="background-color: #d9d9d9">End Set</span>
<span style="background-color: #d9d9d9">End Property</span>
End Module |
See the topic “Creating Properties” in Chapter 3 for all the details, including how to create indexed properties. Note that you can make properties write-only with the WriteOnly keyword (and you must omit the Get method):
|
1 2 3 4 5 6 7 8 |
Module Module2
Private PropertyValue As String
<span style="background-color: #d9d9d9">Public WriteOnly Property Prop1() As String</span>
Set(ByVal Value As String)
PropertyValue = Value
End Set
End Property
End Module |
You can make properties read-only with the ReadOnly keyword (and you must omit the Set method):
|
1 2 3 4 5 6 7 8 |
Module Module2
Private PropertyValue As String
<span style="background-color: #d9d9d9">Public ReadOnly Property Prop1() As String</span>
Get
Return PropertyValue
End Get
End Property
End Module |
| Related solution: | Found on page: |
|---|---|
| Creating Properties | 132 |