Como: Criar um método parcial (Visual Basic)
Métodos parciais oferecem aos desenvolvedores uma maneira de inserir a lógica personalizada no designer-gerado código, geralmente para fins de validaçãode dados. Há duas partes para criar ummétodode parcial: Definindo o métododeassinatura e a implementação de escrita. Normalmente, a definição é escrita pelo designer de um gerador de código e a implementação é escrita por um desenvolvedor que usa o código gerado. For more information, see Métodos parciais (Visual Basic).
Para definir o métododeassinatura
Em umaclasse parcial, começam a assinatura com a palavra-chavePartial.
Use Private como o modificador de acesso.
Adicionar a palavra-chave Sub. O método deve ser um procedimentode Sub.
Escreva o nome do método.
Fornece a lista de parâmetro para o método.
Concluir o método com End Sub.
Para implementar o método
Use Private como o modificador de acesso.
Adicionar outros modificadores que você deseja incluir.
Escreva o nome do método, que deve corresponder ao nome na definição de assinatura .
Adicionar a lista de parâmetro . Nomes de parâmetro devem corresponder aos nomes na assinatura. Tipos de dados do parâmetro podem ser omitidos.
Defina o corpo do método.
Fechar com um End Subdedemonstrativo.
Exemplo
A definição e implementação de ummétodo de parcialsão geralmente em arquivos separados, que são criados usando umaclassede parcial. Normalmente, é a finalidade de ummétodo de parcialfornecer a notificação de que algo no projeto foi alterada.
No exemplo a seguir parcial método chamado OnNameChanged é desenvolvido e chamado. Aassinatura do métodoé definido naclassede parcialCustomer no arquivo Customer.Designer.vb. A implementação é parcialdeclasseCustomer no arquivo Customer.vb e uma instância de Customer é criado em um projeto que usa a classe.
O resultado é uma caixa de mensagem que contém a seguinte mensagem:
Name was changed to: Blue Yonder Airlines.
' File Customer.Designer.vb provides a partial class definition for
' Customer, which includes the signature for partial method
' OnNameChanged.
Partial Class Customer
Private _Name As String
Property Name() As String
Get
Return _Name
End Get
Set(ByVal value As String)
_Name = value
OnNameChanged()
End Set
End Property
' Definition of the partial method signature.
Partial Private Sub OnNameChanged()
End Sub
End Class
' In a separate file, a developer who wants to use the partial class
' and partial method fills in an implementation for OnNameChanged.
Partial Class Customer
' Implementation of the partial method.
Private Sub OnNameChanged()
MsgBox("Name was changed to " & Me.Name)
End Sub
End Class
Module Module1
Sub Main()
' Creation of cust will invoke the partial method.
Dim cust As New Customer With {.Name = "Blue Yonder Airlines"}
End Sub
End Module