Demonstra Passo a passo: Definir classes

Essa explicação passo a passo demonstra como definir classes, que você pode usar para criar objetos.Ele também mostra como adicionar propriedades e métodos à nova classe e demonstra como inicializar um objeto.

Observação:

As caixas de diálogo e o menu comandos que Consulte pode diferir das descritas na Ajuda , Dependendo das configurações ativas ou edição.Para alterar as configurações clicar Importar e exportar configurações on the Ferramentas menu.Para obter mais informações, consulte Configurações do Visual Studio.

Para definir uma classe

  1. Crie um projeto, clicando em Novo Projeto no menu Arquivo.A caixa de diálogo New Project será exibida.

  2. Selecione aplicativos do Windows na lista de modelos de projetos Visual Basic para exibir o novo projeto.

  3. Adicione uma nova classe ao projeto, clicando em Adicionar Classe no menu de Projeto.The Adicionar novo item caixa de diálogo é exibida.

  4. Selecione o modelo Classe.

  5. Nomeie a nova classe UserNameInfo.vb e, em seguida, clique em Adicionar para exibir o código para a nova classe.

    Public Class UserNameInfo
    End Class
    
    Observação:

    Você pode usar o 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.O Editor de Códigos fornece uma instrução End Class correspondente para você.

  6. Defina um campo particular para a classe adicionando o seguinte código entre as instruções Class e End Class:

    Private userNameValue As String
    

    Declarar o campo como Private significa que ele pode ser usado somente dentro da classe.Você pode disponibilizar campos de fora de uma classe usando modificadores de acesso, como Public, que fornecem mias acesso.Para obter mais informações, consulte Níveis de acesso em Visual Basic.

  7. Defina uma propriedade para a classe adicionando o seguinte código:

    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. Defina um método para a classe adicionando o seguinte código:

    Public Sub Capitalize()
        ' Capitalize the value of the property.
        userNameValue = UCase(userNameValue)
    End Sub
    
  9. Defina um construtor com parâmetros para a nova classe adicionando um procedimento denominado Sub New:

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

    O construtor Sub New é chamado automaticamente quando um objeto baseado nessa classe é criado.Esse construtor define o valor do campo que contém o nome de usuário.

Para criar um botão para testar a classe

  1. Altere o formulário de inicialização para o modo de design clicando com o botão direito em seu nome no Gerenciador de Soluções e, em seguida, clicando em Designer de Modo de Exibição.Por padrão, o formulário de inicialização para projetos de aplicativos Windows é chamado Form1.vb.O formulário principal, em seguida, será exibido.

  2. Adicione um botão ao formulário principal e clique duas vezes nele para exibir o código para o manipulador de eventos Button1_Click.Adicione o seguinte código para chamar o procedimento de teste:

    ' 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)
    

Para executar seu aplicativo

  1. Execute o aplicativo pressionando F5.Clique no botão do formulário para chamar o procedimento de teste.Ele exibe uma mensagem informando que o UserName original é "MOORE, BOBBY", porque o procedimento chama o método Capitalize do objeto.

  2. Clique OK para descartar a caixa de mensagem.O procedimento Button1 Click altera o valor da propriedade UserName e exibe uma mensagem informando que o novo valor de UserName é "Worden, Joe".

Consulte também

Tarefas

Como: Adicionar eventos em uma classe

Conceitos

Classes versus módulos

Referência

Declaração Imports (Tipo e Namespace .NET)

Outros recursos

Noções básicas sobre classes

Propriedades de Classe, Campos e Métodos