Procedura dettagliata: definizione delle classi (Visual Basic)

In questa procedura dettagliata viene illustrato come definire classi da utilizzare per creare oggetti. Viene inoltre descritto come aggiungere proprietà e metodi alla nuova classe, nonché come inizializzare un oggetto.

Per definire una classe

1. Creare un progetto scegliendo Nuovo progetto dal menu File. Verrà visualizzata la finestra di dialogo Nuovo progetto.

2. Selezionare Applicazione Windows dall'elenco dei modelli di progetto di Visual Basic per visualizzare il nuovo progetto.

3. Aggiungere una nuova classe al progetto scegliendo Aggiungi classe dal menu Progetto. Viene visualizzata la finestra di dialogo Aggiungi nuovo elemento.

4. Selezionare il modello Classe.

5. Assegnare alla nuova classe il nome UserNameInfo.vb, quindi fare clic su Aggiungi per visualizzare il codice della nuova classe.

   Public Class UserNameInfo
   End Class
   

   Nota

   È possibile utilizzare l'editor di codice di Visual Basic per aggiungere una classe al form di avvio digitando la parola chiave Class seguita dal nome della nuova classe. Verrà automaticamente fornita un'istruzione End Class corrispondente.

6. Definire un campo privato per la classe aggiungendo il codice seguente tra le istruzioni Class e End Class:

   Private userNameValue As String
   

   Se il campo viene dichiarato come Private sarà possibile utilizzarlo solo all'interno della classe. Per rendere disponibili i campi dall'esterno di una classe, è possibile utilizzare modificatori di accesso che consentono un accesso maggiore, ad esempio Public. Per ulteriori informazioni, vedere Livelli di accesso in Visual Basic.

7. Definire una proprietà per la classe aggiungendo il seguente codice:

   Public Property UserName() As String
       Get
           ' Gets the property value.
           Return userNameValue
       End Get
       Set(ByVal Value As String)
           ' Sets the property value.
           userNameValue = Value
       End Set
   End Property
   

8. Definire un metodo per la classe aggiungendo il seguente codice:

   Public Sub Capitalize()
       ' Capitalize the value of the property.
       userNameValue = UCase(userNameValue)
   End Sub
   

9. Definire un costruttore con parametri per la nuova classe aggiungendo una routine denominata Sub New:

   Public Sub New(ByVal UserName As String)
       ' Set the property value.
       Me.UserName = UserName
   End Sub
   

   Il costruttore Sub New viene chiamato automaticamente quando viene creato un oggetto basato su questa classe, e imposta il valore del campo che contiene il nome utente.

Per creare un pulsante per testare la classe

1. Impostare il form di avvio in modalità progettazione facendo clic con il pulsante destro del mouse sul nome corrispondente in Esplora soluzioni e scegliendo Visualizza finestra di progettazione. Per impostazione predefinita, il form di avvio dei progetti Applicazione Windows è denominato Form1.vb. Verrà visualizzato il form principale.

2. Aggiungere un pulsante al form principale e fare doppio clic su di esso per visualizzare il codice per il gestore eventi Button1_Click. Per chiamare la routine di verifica, aggiungere il codice seguente:

   ' Create an instance of the class.
   Dim user As New UserNameInfo("Moore, Bobby")
   ' Capitalize the value of the property.
   user.Capitalize()
   ' Display the value of the property.
   MsgBox("The original UserName is: " & user.UserName)
   ' Change the value of the property.
   user.UserName = "Worden, Joe"
   ' Redisplay the value of the property.
   MsgBox("The new UserName is: " & user.UserName)
   

Per eseguire l'applicazione

1. Premere F5 per eseguire l'applicazione, Fare clic sul pulsante del form per chiamare la routine di verifica. Viene visualizzato un messaggio in cui si dichiara che la proprietà UserName originale è "MOORE, BOBBY", dal momento che la routine ha richiamato il metodo Capitalize dell'oggetto.

2. Scegliere OK per chiudere la finestra del messaggio. La routine Button1 Click modifica il valore della proprietà UserName e visualizza un messaggio in cui si dichiara che il nuovo valore di UserName è "Worden, Joe".

Vedere anche

Concetti

Programmazione orientata a oggetti (C# e Visual Basic)

Altre risorse

Oggetti e classi in Visual Basic