Como: Criar um método parcial (Visual Basic)
Métodos parcial forneçam aos desenvolvedores uma maneira de inserir lógica personalizada no código gerado pelo designer, geralmente para fins de validação de dados.Há duas partes para a criação de um método parcial: definir a assinatura do método e gravação a implementação.Normalmente, a definição foi criada pelo designer de um gerador de código e a implementação é escrita por um desenvolvedor que usa o código gerado.Para obter mais informações, consulte Métodos parciais.
Para definir a assinatura do método
Em uma classe parcial, começam a assinatura com a palavra-chave Partial.
Use Private sistema autônomo o modificador de acesso.
Adicionar a palavra-chave Sub. O método deve ser um procedimento Sub.
gravar o nome do método.
Fornece a lista de parâmetros para o método.
Concluir o método com End Sub.
Para implementar o método
Use Private sistema autônomo o modificador de acesso.
Adicione outros modificadores que você deseja incluir.
Escreva o nome do método, o que deve corresponder ao nome na definição de assinatura.
Adicione a lista de parâmetro.Nomes de parâmetro devem corresponder aos nomes na assinatura.Tipos de dados de parâmetro podem ser omitidos.
Defina o corpo do método.
fechar com um End Sub demonstrativo.
Exemplo
A definição e implementação de um método parcial são geralmente em arquivos separados, que são criados com o uso de uma classe parcial.Normalmente, é a finalidade de um método parcial fornecer uma notificação informando que algo no projeto foi alterado.
No exemplo a seguir, um método parcial chamado OnNameChanged é desenvolvido e chamado. A assinatura do método é definida na classe parcial Customer no arquivo cliente.Designer.vb. A implementação é na classe parcial Customer no arquivo cliente.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