Compartilhar via

Propriedades e métodos sobrecarregados (Visual Basic)

  • Artigo

Sobrecarga é a criação de mais de um procedimento, construtor de instância ou propriedade em uma classe com o mesmo nome, mas tipos de argumento diferentes.

Uso de sobrecarga

A sobrecarga é especialmente útil quando o modelo de objeto determina que você empregue nomes idênticos para procedimentos que operam em diferentes tipos de dados. Por exemplo, uma classe que pode exibir vários tipos de dados diferentes pode ter procedimentos Display semelhantes a este:

Overloads Sub Display(ByVal theChar As Char)
    ' Add code that displays Char data.
End Sub
Overloads Sub Display(ByVal theInteger As Integer)
    ' Add code that displays Integer data.
End Sub
Overloads Sub Display(ByVal theDouble As Double)
    ' Add code that displays Double data.
End Sub

Sem sobrecarregar, você precisaria criar nomes distintos para cada procedimento, mesmo que eles façam a mesma coisa, conforme mostrado no seguinte exemplo:

Sub DisplayChar(ByVal theChar As Char)
    ' Add code that displays Char data.
End Sub
Sub DisplayInt(ByVal theInteger As Integer)
    ' Add code that displays Integer data.
End Sub
Sub DisplayDouble(ByVal theDouble As Double)
    ' Add code that displays Double data.
End Sub

A sobrecarga facilita o uso de propriedades ou métodos porque fornece uma opção de tipos de dados que podem ser usados. Por exemplo, o método sobrecarregado Display discutido anteriormente pode ser chamado com qualquer uma das seguintes linhas de código:

' Call Display with a literal of type Char.
Display("9"c)
' Call Display with a literal of type Integer.
Display(9)
' Call Display with a literal of type Double.
Display(9.9R)

Em tempo de execução, o Visual Basic chama o procedimento correto com base nos tipos de dados dos parâmetros especificados.

Regras de sobrecarga

Você cria um membro sobrecarregado para uma classe adicionando duas ou mais propriedades ou métodos com o mesmo nome. Exceto para membros derivados sobrecarregados, cada membro sobrecarregado precisa ter listas de parâmetros diferentes e os seguintes itens não podem ser usados como um recurso de diferenciação ao sobrecarregar uma propriedade ou procedimento:

  • Modificadores, como ByVal ou ByRef, que se aplicam a um membro ou parâmetros do membro.

  • Nomes de parâmetros

  • Tipos de retorno dos procedimentos

A palavra-chave Overloads é opcional ao sobrecarregar, mas se qualquer membro sobrecarregado usar a palavra-chave Overloads, todos os outros membros sobrecarregados com o mesmo nome também deverão especificar essa palavra-chave.

Classes derivadas podem sobrecarregar membros herdados com membros que têm parâmetros e tipos de parâmetro idênticos, um processo conhecido como sombreamento por nome e assinatura. Se a palavra-chave Overloads for usada ao sombrear por nome e assinatura, a implementação do membro da classe derivada será usada em vez da implementação na classe base e todas as outras sobrecargas para esse membro estarão disponíveis para instâncias da classe derivada.

Se a palavra-chave Overloads for omitida ao sobrecarregar um membro herdado com um membro que tenha parâmetros e tipos de parâmetro idênticos, a sobrecarga será chamada de sombreamento por nome. O sombreamento por nome substitui a implementação herdada de um membro e torna todas as outras sobrecargas não disponíveis para instâncias da classe derivada e os decedentes.

Os modificadores Overloads e Shadows não podem ser usados com a mesma propriedade ou método.

Exemplo

O exemplo a seguir cria métodos sobrecarregados que aceitam uma representação String ou Decimal de um valor em dólar e retornam uma cadeia de caracteres que contém o imposto sobre vendas.

Para usar este exemplo para criar um método sobrecarregado

  1. Abra um novo projeto e adicione uma classe chamada TaxClass.

  2. Adicione o código a seguir à classe TaxClass .

    Public Class TaxClass
    Overloads Function TaxAmount(ByVal decPrice As Decimal,
         ByVal TaxRate As Single) As String
        TaxAmount = "Price is a Decimal. Tax is $" &
           (CStr(decPrice * TaxRate))
    End Function

    Overloads Function TaxAmount(ByVal strPrice As String,
          ByVal TaxRate As Single) As String
        TaxAmount = "Price is a String. Tax is $" &
           CStr((CDec(strPrice) * TaxRate))
    End Function
End Class

  3. Adicione o procedimento a seguir ao formulário.

    Sub ShowTax()
    ' 8% tax rate.
    Const TaxRate As Single = 0.08
    ' $64.00 Purchase as a String.
    Dim strPrice As String = "64.00"
    ' $64.00 Purchase as a Decimal.
    Dim decPrice As Decimal = 64
    Dim aclass As New TaxClass
    'Call the same method with two different kinds of data.
    MsgBox(aclass.TaxAmount(strPrice, TaxRate))
    MsgBox(aclass.TaxAmount(decPrice, TaxRate))
End Sub

  4. Adicione um botão ao formulário e chame o procedimento ShowTax do evento Button1_Click do botão.

  5. Execute o projeto e clique no botão no formulário para testar o procedimento ShowTax sobrecarregado.

Em tempo de execução, o compilador escolhe a função sobrecarregada apropriada que corresponde aos parâmetros que estão sendo usados. Quando você clica no botão, o método sobrecarregado é chamado primeiro com um parâmetro Price que é uma cadeia de caracteres e a mensagem: "Preço é uma cadeia de caracteres. O imposto é de US$ 5,12" é exibida. TaxAmount é chamado com um valor Decimal na segunda vez e a mensagem: "O preço é um Decimal. O imposto é de US$ 5,12" é exibida.

Confira também