Ocultação de dados em VB .NET
A ocultação de dados é a capacidade de uma classe restringir o acesso de seus membros de dados a certas categorias de métodos ou classes.

Existem dois tipos de ocultação de dados no VB .NET:

1. Encapsulamento: O encapsulamento, quando usado no contexto do Visual Basic .NET, é a técnica de agrupar variáveis ​​e funções dentro de uma classe. Todos os detalhes estão agrupados para que o usuário só precise saber como funciona a aula, e não como funciona.

2. Modificador de acessibilidade: Eles são usados ​​para especificar o nível de acesso dos elementos da classe. A acessibilidade dos membros da classe (campos, métodos e propriedades) pode ser alterada com base no escopo onde eles podem ser acessados.

A tabela a seguir fornece uma visão geral dos diferentes modificadores de acessibilidade com uma explicação de seus escopos.

| Modificador | Escopo |
|-------|-------|
| Privado | Disponível apenas dentro da classe. |
| Protegido | Disponível na classe, em suas classes derivadas e nos amigos. |
| Interno | Disponível dentro da montagem. |
| Interno Protegido | Disponível na montagem e nas classes derivadas. |
| Público | Disponível para todas as outras classes do projeto, as classes dos diferentes projetos da mesma solução e as classes de outros projetos que fazem referência a este assembly. |
| Amigo | Disponível para todas as classes da mesma montagem ou projeto. |
| Não herdável | Disponível apenas para a classe e não pode ser herdado |

Exemplo de ocultação de dados em VBNET:
```
Cliente de classe pública

_id privado
Privado _fName
Privado _lNome
_e-mail privado


ID da propriedade pública
Pegar
Retornar _id
Fim

Definir (valor)
Se valor <=0 Então
Throw New System.ArgumentException("ID deve ser um número inteiro positivo.", "ID")
Terminar se
_id =valor
Conjunto final
Propriedade final

Nome da propriedade pública
Pegar
Retornar _fNome
Fim

Definir (valor)
_fNome =valor
Conjunto final
Propriedade final

Sobrenome de propriedade pública
Pegar
Retornar _lNome
Fim

Definir (valor)
_lNome =valor
Conjunto final
Propriedade final

E-mail de propriedade pública
Pegar
Retornar _e-mail
Fim

Definir (valor)
Se não for IsValidEmail(valor) então
Throw New System.ArgumentException("Endereço de e-mail inválido.", "E-mail")
Terminar se
_e-mail =valor
Conjunto final
Propriedade final

Função privada compartilhada IsValidEmail(email)
Dim emailRegex As String ="^[a-zA-Z0-9._%+-]+@[a-zA-Z0-9.-]+\.[a-zA-Z]{2,6}$ "
Dim emailMatch As Boolean =Regex.IsMatch(email, emailRegex)
Retornar e-mailMatch
Função final
Fim da aula
```
No exemplo acima, definimos uma classe chamada `Cliente` que encapsula os detalhes do cliente, como ID, nome, sobrenome e e-mail. Também definimos um método privado compartilhado chamado `IsValidEmail` que é usado para validar o endereço de e-mail. A acessibilidade dos membros da classe é controlada usando os modificadores de acessibilidade `Private` e `Public`. A propriedade `ID` está marcada como `Private`, o que significa que não pode ser acessada fora da classe. As propriedades `FirstName`, `LastName` e `Email` são marcadas como `Public`, o que significa que podem ser acessadas de fora da classe.