Em algumas ocasiões precisamos que um método tenha diferentes parâmetros e atue de diferentes formas, porêm, precisamos que o método tenha o mesmo nome para todos estes diferentes procedimentos.
Nestes casos podemos utilizar a sobrecarga de operadores como podemos ver no
caso abaixo.
· Podemos utilizar o overload apenas com métodos e propriedades
Exemplos
'EX1:Sobrecarga do construtor
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim carlos As New cliente("Manoel Silva")
MsgBox(carlos.nome)
End Sub
Class cliente
Sub New()
nome = "Carlos da Silva Marinho"
End Sub
Sub New(ByVal nomes As String)
nome = nomes
End Sub
Public nome As String
Dim endereco As String
Dim telefone As String
Dim celular As String
End Class
'Ex2: Sobrecarga de procedimento
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim carlos As New cliente()
carlos.casa("Manoel")
MsgBox(carlos.nome)
End Sub
Class cliente
Overloads Sub casa()
nome = "Carlos da Silva Marinho"
End Sub
Overloads Sub casa(ByVal nomes As String)
nome = nomes
End Sub
Public nome As String
Dim endereco As String
Dim telefone As String
Dim celular As String
End Class