Procedura dettagliata: Definizione di classi (Visual Basic)Walkthrough: Defining Classes (Visual Basic)

In questa procedura dettagliata viene illustrato come definire le classi, che è possibile utilizzare per creare oggetti.This walkthrough demonstrates how to define classes, which you can then use to create objects. Viene inoltre illustrato come aggiungere proprietà e metodi alla nuova classe e viene illustrato come inizializzare un oggetto.It also shows you how to add properties and methods to the new class, and demonstrates how to initialize an object.

Nota

Nomi o percorsi visualizzati per alcuni elementi dell'interfaccia utente di Visual Studio nelle istruzioni seguenti potrebbero essere diversi nel computer in uso.Your computer might show different names or locations for some of the Visual Studio user interface elements in the following instructions. La versione di Visual Studio in uso e le impostazioni configurate determinano questi elementi.The Visual Studio edition that you have and the settings that you use determine these elements. Per altre informazioni, vedere Personalizzazione dell'IDE.For more information, see Personalizing the IDE.

Per definire una classeTo define a class

  1. Per creare un progetto, fare clic su nuovo progetto dal menu file .Create a project by clicking New Project on the File menu. Verrà visualizzata la finestra di dialogo Nuovo progetto .The New Project dialog box appears.

  2. Selezionare applicazione Windows dall'elenco dei modelli di progetto Visual Basic per visualizzare il nuovo progetto.Select Windows Application from the list of Visual Basic project templates to display the new project.

  3. Per aggiungere una nuova classe al progetto, fare clic su Aggiungi classe dal menu progetto .Add a new class to the project by clicking Add Class on the Project menu. Verrà visualizzata la finestra di dialogo Aggiungi nuovo elemento.The Add New Item dialog box appears.

  4. Selezionare il modello di classe .Select the Class template.

  5. Assegnare un nome alla UserNameInfo.vbnuova classe e quindi fare clic su Aggiungi per visualizzare il codice per la nuova classe.Name the new class UserNameInfo.vb, and then click Add to display the code for the new class.

    Public Class UserNameInfo
    End Class
    

    Nota

    È possibile usare l' editor di codice Visual Basic per aggiungere una classe al form di avvio digitando la Class parola chiave seguita dal nome della nuova classe.You can use the Visual Basic Code Editor to add a class to your startup form by typing the Class keyword followed by the name of the new class. L' editor di codice fornisce un' End Class istruzione corrispondente.The Code Editor provides a corresponding End Class statement for you.

  6. Definire un campo privato per la classe aggiungendo il codice seguente tra le Class istruzioni e: End ClassDefine a private field for the class by adding the following code between the Class and End Class statements:

    Private userNameValue As String
    

    Dichiarare il campo come Private significa che può essere utilizzato solo all'interno della classe.Declaring the field as Private means it can be used only within the class. È possibile rendere disponibili i campi dall'esterno di una classe usando i modificatori di Public accesso, ad esempio, che forniscono maggiore accesso.You can make fields available from outside a class by using access modifiers such as Public that provide more access. Per altre informazioni, vedere livelli di accesso in Visual Basic.For more information, see Access levels in Visual Basic.

  7. Definire una proprietà per la classe aggiungendo il codice seguente:Define a property for the class by adding the following code:

    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 codice seguente:Define a method for the class by adding the following code:

    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 procedura denominata Sub New:Define a parameterized constructor for the new class by adding a procedure named Sub New:

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

    Il Sub New costruttore viene chiamato automaticamente quando viene creato un oggetto basato su questa classe.The Sub New constructor is called automatically when an object based on this class is created. Questo costruttore imposta il valore del campo che contiene il nome utente.This constructor sets the value of the field that holds the user name.

Per creare un pulsante per testare la classeTo create a button to test the class

  1. Modificare il modulo di avvio in modalità progettazione facendo clic con il pulsante destro del mouse sul nome in Esplora soluzioni e quindi scegliendo Visualizza finestra di progettazione.Change the startup form to design mode by right-clicking its name in Solution Explorer and then clicking View Designer. Per impostazione predefinita, il form di avvio per i progetti di applicazioni Windows è denominato Form1. vb.By default, the startup form for Windows Application projects is named Form1.vb. Verrà visualizzato il form principale.The main form will then appear.

  2. Aggiungere un pulsante al form principale e fare doppio clic su di esso per visualizzare il codice per Button1_Click il gestore eventi.Add a button to the main form and double-click it to display the code for the Button1_Click event handler. Aggiungere il codice seguente per chiamare la procedura di test:Add the following code to call the test procedure:

    ' 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'applicazioneTo run your application

  1. Eseguire l'applicazione premendo F5.Run your application by pressing F5. Fare clic sul pulsante nel form per chiamare la procedura di test.Click the button on the form to call the test procedure. Viene visualizzato un messaggio che informa che l'originale UserName è "Moore, Bobby", perché la procedura ha chiamato Capitalize il metodo dell'oggetto.It displays a message stating that the original UserName is "MOORE, BOBBY", because the procedure called the Capitalize method of the object.

  2. Fare clic su OK per chiudere la finestra del messaggio.Click OK to dismiss the message box. La Button1 Click stored procedure modifica il valore UserName della proprietà e visualizza un messaggio che informa che il nuovo valore di UserName è "worden, Joe".The Button1 Click procedure changes the value of the UserName property and displays a message stating that the new value of UserName is "Worden, Joe".

Vedere ancheSee also