Procedura: creare una proprietà
Aggiornamento: novembre 2007
Una definizione di proprietà viene racchiusa tra un'istruzione Property e un'istruzione End Property. All'interno della definizione è necessario definire una routine Get, una routine Set o entrambe. Tra le due routine è incluso tutto il codice della proprietà.
La routine Get recupera il valore della proprietà, mentre la routine Set memorizza un valore. Per assegnare alla proprietà l'accesso in lettura e in scrittura, è necessario definire entrambe le routine. Per una proprietà di sola lettura viene definita soltanto la routine Get, mentre per una proprietà di sola scrittura viene definita soltanto la routine Set.
Per creare una proprietà
All'esterno di qualsiasi proprietà o routine utilizzare un'Istruzione Property, seguita da un'istruzione End Property.
Se la proprietà accetta parametri, dopo la parola chiave Property inserire il nome della routine, quindi l'elenco dei parametri tra parentesi.
Dopo le parentesi inserire una clausola As per specificare il tipo di dati del valore della proprietà. È necessario specificare il tipo di dati anche per una proprietà di sola scrittura.
Aggiungere le routine Get e Set nel modo appropriato. Vedere le istruzioni riportate di seguito.
Per creare una routine Get che recupera il valore di una proprietà
Tra le istruzioni Property ed End Property definire un'Istruzione Get, seguita da un'istruzione End Get. Per la routine Get non è necessario definire alcun parametro.
Inserire le istruzioni del codice necessarie per il recupero del valore della proprietà tra le istruzioni Get ed End Get. Oltre a generare e restituire il valore della proprietà, il codice può includere altri calcoli e modifiche di dati.
Utilizzare un'istruzione Return per restituire il valore della proprietà al codice chiamante.
È necessario definire una routine Get sia per una proprietà di lettura e scrittura che per una proprietà di sola lettura. Non deve invece essere definita una routine Get per una proprietà di sola scrittura.
Per creare una routine Set che definisce il valore di una proprietà
Tra le istruzioni Property ed End Property definire un'Istruzione Set (Visual Basic), seguita da un'istruzione End Set.
All'interno dell'istruzione Set inserire un elenco di parametri tra parentesi dopo la parola chiave Set. Tale elenco deve includere almeno un parametro specifico per il valore passato dal codice chiamante. Il nome predefinito per questo parametro è Value, ma è possibile utilizzare un nome diverso in base alle esigenze. Il tipo di dati del parametro valore deve corrispondere a quello della proprietà stessa.
Inserire le istruzioni del codice necessarie per la memorizzazione di un valore nella proprietà tra le istruzioni Set ed End Set. Oltre a convalidare e memorizzare il valore della proprietà, il codice può includere altri calcoli e modifiche di dati.
Utilizzare il parametro valore per accettare il valore fornito dal codice chiamante. Il valore può essere memorizzato direttamente in un'istruzione di assegnazione oppure utilizzato in un'espressione per il calcolo del valore interno da memorizzare.
È necessario definire una routine Set sia per una proprietà di lettura e scrittura che per una proprietà di sola scrittura. Non deve invece essere definita una routine Set per una proprietà di sola lettura.
Esempio
Nell'esempio riportato di seguito viene creata una proprietà di lettura e scrittura che memorizza un nome completo costituito da due parti, ossia il nome e il cognome. Quando il codice chiamante legge fullName, la routine Get combina le due parti costitutive e restituisce il nome completo. Quando il codice chiamante assegna un nuovo nome completo, la routine Set tenta di scomporlo in due parti costitutive. Se non viene rilevato alcuno spazio, viene memorizzato tutto come nome.
Dim firstName, lastName As String
Property fullName() As String
Get
If lastName = "" Then
Return firstName
Else
Return firstName & " " & lastName
End If
End Get
Set(ByVal Value As String)
Dim space As Integer = Value.IndexOf(" ")
If space < 0 Then
firstName = Value
lastName = ""
Else
firstName = Value.Substring(0, space)
lastName = Value.Substring(space + 1)
End If
End Set
End Property
Nell'esempio riportato di seguito vengono illustrate le chiamate tipiche alle routine delle proprietà di fullName. La prima chiamata imposta il valore delle proprietà, mentre la seconda lo recupera.
fullName = "MyFirstName MyLastName"
MsgBox(fullName)
Vedere anche
Attività
Procedura: dichiarare una proprietà con livelli di accesso misto
Procedura: chiamare una routine di proprietà
Procedura: dichiarare e chiamare una proprietà predefinita in Visual Basic
Procedura: inserire un valore in una proprietà
Procedura: ottenere un valore da una proprietà