Sombreamento no Visual Basic
Quando dois elementos de programação compartilham o mesmo nome, um deles pode ocultar ou sombrear o outro. Nessa situação, o elemento sombreado não está disponível para referência; em vez disso, quando o código usa o nome do elemento, o compilador do Visual Basic resolve-o para o elemento de sombreamento.
Finalidade
A principal finalidade do sombreamento é proteger a definição dos seus membros de classe. A classe base pode sofrer uma alteração que cria um elemento com o mesmo nome que você já definiu. Se isso acontecer, o modificador Shadows forçará as referências por meio de sua classe a serem resolvidas para o membro que você definiu, em vez de para o novo elemento de classe base.
Tipos de Sombreamento
Um elemento pode sombrear outro elemento de duas maneiras diferentes. O elemento de sombreamento pode ser declarado dentro de uma sub-região da região que contém o elemento sombreado, caso em que a sombra é realizada por meio do escopo. Ou uma classe derivada pode redefinir um membro de uma classe base, nesse caso, o sombreamento é feito por meio da herança.
Sombreamento por Escopo
É possível que elementos de programação no mesmo módulo, classe ou estrutura tenham o mesmo nome, mas escopo diferente. Quando dois elementos são declarados dessa maneira e o código se refere ao nome que eles compartilham, o elemento com o escopo mais estreito sombreia o outro elemento (o escopo de bloco é o mais estreito).
Por exemplo, um módulo pode definir uma variável Public nomeada temp e um procedimento dentro do módulo pode declarar uma variável local também chamada temp. As referências de temp dentro do procedimento acessam a variável local, enquanto as referências de temp fora do procedimento acessam a variável Public. Nesse caso, a variável de procedimento temp sombreia a variável do módulo temp.
A ilustração a seguir mostra duas variáveis, ambas nomeadas temp. A variável local temp sombreia a variável de membro temp quando acessada de dentro de seu próprio procedimento p. No entanto, a palavra-chave MyClass ignora o sombreamento e acessa a variável de membro.
Para obter um exemplo de sombreamento por meio do escopo, consulte Como Ocultar uma Variável com o Mesmo Nome que sua Variável.
Sombreamento por Herança
Se uma classe derivada redefine um elemento de programação herdado de uma classe base, o elemento de redefinição sombreia o elemento original. Você pode sombrear qualquer tipo de elemento declarado ou conjunto de elementos sobrecarregados com qualquer outro tipo. Por exemplo, uma variável Integer pode sombrear um procedimento Function. Se você sombrear um procedimento com outro procedimento, poderá usar uma lista de parâmetros diferente e um tipo de retorno diferente.
A ilustração a seguir mostra uma classe base b e uma classe derivada d que herda de b. A classe base define um procedimento chamado proce a classe derivada o sombreia com outro procedimento de mesmo nome. A primeira instrução Call acessa o sombreamento proc na classe derivada. No entanto, a palavra-chave MyBase ignora o sombreamento e acessa o procedimento sombreado na classe base.
Para obter um exemplo de sombreamento por meio da herança, consulte Como Ocultar uma Variável com o Mesmo Nome que sua Variável e Como Ocultar uma Variável Herdada.
Sombreamento e Nível de Acesso
O elemento de sombreamento nem sempre é acessível pelo código usando a classe derivada. Por exemplo, ele pode ser declarado como Private. Nesse caso, o sombreamento é derrotado e o compilador resolve qualquer referência ao mesmo elemento que teria se não houvesse sombreamento. Esse elemento é o elemento acessível que menos passos derivacionais para trás da classe de sombreamento. Se o elemento sombreado for um procedimento, a resolução será para a versão mais próxima acessível com o mesmo nome, lista de parâmetros e tipo de retorno.
O exemplo a seguir mostra uma hierarquia de herança de três classes. Cada classe define um procedimento Subdisplay e cada classe derivada sombreia o procedimento display na classe base.
Public Class firstClass
Public Sub display()
MsgBox("This is firstClass")
End Sub
End Class
Public Class secondClass
Inherits firstClass
Private Shadows Sub display()
MsgBox("This is secondClass")
End Sub
End Class
Public Class thirdClass
Inherits secondClass
Public Shadows Sub display()
MsgBox("This is thirdClass")
End Sub
End Class
Module callDisplay
Dim first As New firstClass
Dim second As New secondClass
Dim third As New thirdClass
Public Sub callDisplayProcedures()
' The following statement displays "This is firstClass".
first.display()
' The following statement displays "This is firstClass".
second.display()
' The following statement displays "This is thirdClass".
third.display()
End Sub
End Module
No exemplo anterior, as sombras secondClass de classe derivada display com um procedimento Private. Quando o módulo callDisplay chama display em secondClass, o código de chamada está fora de secondClass e, portanto, não pode acessar o procedimento privado display. O sombreamento é derrotado e o compilador resolve a referência ao procedimento de classe base display.
No entanto, a classe derivada thirdClass adicional declara display como Public, para que o código em callDisplay possa acessá-lo.
Sombreamento e Substituição
Não confunda sombreamento com substituição. Ambos são usados quando uma classe derivada herda de uma classe base e redefine um elemento declarado com outro. Mas há diferenças significativas entre os dois. Para obter uma comparação, consulte Diferenças entre Sombreamento e Substituição.
Sombreamento e Sobrecarga
Se você sombrear o mesmo elemento de classe base com mais de um elemento em sua classe derivada, os elementos de sombreamento se tornarão versões sobrecarregadas desse elemento. Para obter mais informações, consulte Sobrecarga de Procedimento.
Acessando um Elemento Sombreado
Quando você acessa um elemento de uma classe derivada, normalmente faz isso por meio da instância atual dessa classe derivada, qualificando o nome do elemento com a palavra-chave Me. Se a classe derivada sombrear o elemento na classe base, você poderá acessar o elemento de classe base qualificando-o com a palavra-chave MyBase.
Para obter um exemplo de como acessar um elemento sombreado, consulte Como Acessar uma Variável Oculta por uma Classe Derivada.
Declaração da Variável de Objeto
A forma como você cria a variável de objeto também pode afetar se a classe derivada acessa um elemento de sombreamento ou o elemento sombreado. O exemplo a seguir cria dois objetos de uma classe derivada, mas um objeto é declarado como a classe base e o outro como a classe derivada.
Public Class baseCls
' The following statement declares the element that is to be shadowed.
Public z As Integer = 100
End Class
Public Class dervCls
Inherits baseCls
' The following statement declares the shadowing element.
Public Shadows z As String = "*"
End Class
Public Class useClasses
' The following statement creates the object declared as the base class.
Dim basObj As baseCls = New dervCls()
' Note that dervCls widens to its base class baseCls.
' The following statement creates the object declared as the derived class.
Dim derObj As dervCls = New dervCls()
Public Sub showZ()
' The following statement outputs 100 (the shadowed element).
MsgBox("Accessed through base class: " & basObj.z)
' The following statement outputs "*" (the shadowing element).
MsgBox("Accessed through derived class: " & derObj.z)
End Sub
End Class
No exemplo anterior, a variável basObj é declarada como a classe base. Atribuir um objeto dervCls a ele constitui uma conversão de expansão e, portanto, é válido. No entanto, a classe base não pode acessar a versão de sombreamento da variável z na classe derivada, portanto, o compilador resolve basObj.z para o valor da classe base original.
