Instrução Class (Visual Basic)

  • Artigo

Declara o nome de uma classe e apresenta a definição das variáveis, propriedades, eventos e procedimentos que a classe compreende.

Sintaxe

[ <attributelist> ] [ accessmodifier ] [ Shadows ] [ MustInherit | NotInheritable ] [ Partial ] _  
Class name [ ( Of typelist ) ]  
    [ Inherits classname ]  
    [ Implements interfacenames ]  
    [ statements ]  
End Class

Partes

Termo Definição
attributelist Opcional. Veja Lista de atributo.
accessmodifier Opcional. Um dos seguintes pode ser feito:

- Público
- Protegido
- Friend
- Privado
- Amigo Protegido
- Particular Protegido

Consulte Níveis de acesso no Visual Basic.
Shadows Opcional. Confira Sombras.
MustInherit Opcional. Confira MustInherit.
NotInheritable Opcional. Confira NotInheritable.
Partial Opcional. Indica uma definição parcial da classe. Confira Parcial.
name Obrigatórios. Nome desta classe. Confira Nomes de elementos declarados.
Of Opcional. Especifica que essa é uma classe genérica.
typelist Obrigatório se você usar a palavra-chave Of. Lista de parâmetros de tipo para essa classe. Confira Lista de tipos.
Inherits Opcional. Indica que essa classe herda os membros de outra classe. Confira Instrução Inherits.
classname Obrigatório se você usar a instrução Inherits. O nome da classe da qual essa classe deriva.
Implements Opcional. Indica que essa classe implementa os membros de uma ou mais interfaces. Confira Instrução Implements.
interfacenames Obrigatório se você usar a instrução Implements. Os nomes das interfaces que essa classe implementa.
statements Opcional. Instruções que definem os membros dessa classe.
End Class Obrigatórios. Termina a definição Class.

Comentários

Uma instrução Class define um novo tipo de dados. Uma classe é um bloco de construção fundamental da OOP (programação orientada a objeto). Para obter mais informações, confira Objetos e classes.

Você só pode usar Class no namespace ou no nível do módulo. Isso significa que o contexto de declaração de uma classe precisa ser um arquivo de origem, namespace, classe, estrutura, módulo ou interface, e não pode ser um procedimento ou bloco. Para obter mais informações, consulte Contextos de declaração e níveis de acesso padrão.

Cada instância de uma classe tem um tempo de vida independente de todas as outras instâncias. Esse tempo de vida começa quando ele é criado por uma cláusula New Operator ou por uma função como CreateObject. Ele termina quando todas as variáveis que apontam para a instância foram definidas como Nothing ou para instâncias de outras classes.

As classes assumem o padrão de acesso Amigo. Você pode ajustar os níveis de acesso com os modificadores de acesso. Para obter mais informações, consulte Níveis de acesso no Visual Basic.

Regras

  • Aninhamento. Você pode definir uma classe dentro de outra. A classe externa é chamada de classe independente e a classe interna é chamada de classe aninhada.

  • Herança. Se a classe usar a Instrução Inherits, você poderá especificar apenas uma classe base ou interface. Uma classe não pode herdar de mais de um elemento.

    Uma classe não pode herdar de outra classe com um nível de acesso mais restritivo. Por exemplo, uma classe Public não pode herdar de uma classe Friend.

    Uma classe não pode herdar de uma classe que está aninhada dentro dela.

  • Implementação. Se a classe usar a Instrução Implements, você deverá implementar todos os membros definidos por cada interface especificada em interfacenames. Uma exceção a isso é a reimplementação de um membro de classe base. Para obter mais informações, consulte "Reimplementação" em Implements.

  • Propriedade padrão. Uma classe pode especificar no máximo uma propriedade como a propriedade padrão. Para obter mais informações, confira Padrão.

Comportamento

  • Nível de acesso. Em uma classe, você pode declarar cada membro com o próprio nível de acesso. Os membros da classe assumem o padrão de acesso Público, exceto variáveis e constantes, que assumem o padrão de acesso Privado. Quando uma classe tem acesso mais restrito do que um dos membros dele, o nível de acesso da classe tem precedência.

  • Escopo. Uma classe está no escopo em todo o namespace, classe, estrutura ou módulo que a contém.

    O escopo de cada membro de classe é a classe inteira.

    Tempo de vida. Visual Basic não oferece suporte a classes estáticas. O equivalente funcional de uma classe estática é fornecido por um módulo. Para obter mais informações, confira Instrução Module.

    Os membros da classe têm tempo de vida dependendo de como e onde são declarados. Para saber mais, consulte Tempo de vida no Visual Basic.

  • Qualificação. O código fora de uma classe deve qualificar o nome de um membro com o nome dessa classe.

    Se o código dentro de uma classe aninhada fizer uma referência não qualificada a um elemento de programação, o Visual Basic procurará o elemento primeiro na classe aninhada e, em seguida, na classe recipiente e assim por diante até o elemento recipiente mais externo.

Classes e módulos

Estes elementos têm muitas semelhanças, mas também há algumas diferenças importantes.

  • Terminologia. As versões anteriores do Visual Basic reconhecem dois tipos de módulos: módulos de classe (arquivos .cls) e módulos padrão (arquivos .bas). A versão atual chama essas classes e módulos, respectivamente.

  • Membros compartilhados. Você pode controlar se um membro de uma classe é um membro compartilhado ou de instância.

  • Orientação a objeto. As classes são orientadas a objetos, mas os módulos não são. Você pode criar uma ou mais instâncias de uma classe. Para obter mais informações, confira Objetos e classes.

Exemplo

O exemplo a seguir usa uma instrução Class para definir uma classe e vários membros.

Class BankAccount
    Shared interestRate As Decimal
    Private accountBalance As Decimal
    Public holdOnAccount As Boolean = False

    Public ReadOnly Property Balance() As Decimal
        Get
            Return accountBalance
        End Get
    End Property

    Public Sub PostInterest()
        accountBalance = accountBalance * (1 + interestRate)
    End Sub

    Public Sub PostDeposit(ByVal amountIn As Decimal)
        accountBalance = accountBalance + amountIn
    End Sub

    Public Sub PostWithdrawal(ByVal amountOut As Decimal)
        accountBalance = accountBalance - amountOut
    End Sub
End Class

Confira também