Agora vamos criar uma classe produto para mostrarmos melhor o conceito de orientação a objeto.
Nossa classe produto terá quatro propriedades e um método.
Propriedades
- Nome
- Preço
- Data Fabricação
- Dias Validade
Método
Clique com o botão direito do mouse no projeto/Website e selecione add à New Item
Selecione class e digite produto.vb , clique em Add
Foi criado um arquivo somente com a definição da classe.
Public Class Produto
End Class
Vamos agora adicionar as propriedades e o método, para criar a propriedade clique com o botão direito dentro do arquivo, selecione Insert Snippet
Selecione Common Code Patterns à Properties and Procedures à Define a Property
Será criado o código Abaixo:
Public Class Produto
Private newPropertyValue As Integer
Public Property NewProperty() As Integer
Get
Return newPropertyValue
End Get
Set(ByVal value As Integer)
newPropertyValue = value
End Set
End Property
End Class
Agora vamos alterar o nome e tipo da propriedade
Public Class Produto
Private _nome As String
Public Property Nome() As String
Get
Return _nome
End Get
Set(ByVal value As String)
_nome = value
End Set
End Property
End Class
Agora repita os passos anteriores para criar as outras propriedades, veja o código como deve ficar.
Public Class Produto
Private _nome As String
Public Property Nome() As String
Get
Return _nome
End Get
Set(ByVal value As String)
_nome = value
End Set
End Property
Private _DataFabricacao As DateTime
Public Property DataFabricacao() As DateTime
Get
Return _DataFabricacao
End Get
Set(ByVal value As DateTime)
_DataFabricacao = value
End Set
End Property
Private _NumeroDias As Integer
Public Property NumeroDias() As Integer
Get
Return _NumeroDias
End Get
Set(ByVal value As Integer)
_NumeroDias = value
End Set
End Property
Private _Preco As Double
Public Property Preco() As Double
Get
Return _Preco
End Get
Set(ByVal value As Double)
_Preco = value
End Set
End Property
End Class
Agora vamos criar nosso método
Function RetornaDataValidade() As DateTime
Return DataFabricacao.AddDays(NumeroDias)
End Function
Nesse método utilizamos a propriedade DataFabricacao e NumeroDias , como DataFabricacao é do tipo data, temos o método de soma para dia AddDays.
Nossa classe já pode ser utilizada em nossa página:
Public Class Produto
Private _nome As String
Public Property Nome() As String
Get
Return _nome
End Get
Set(ByVal value As String)
_nome = value
End Set
End Property
Private _DataFabricacao As DateTime
Public Property DataFabricacao() As DateTime
Get
Return _DataFabricacao
End Get
Set(ByVal value As DateTime)
_DataFabricacao = value
End Set
End Property
Private _NumeroDias As Integer
Public Property NumeroDias() As Integer
Get
Return _NumeroDias
End Get
Set(ByVal value As Integer)
_NumeroDias = value
End Set
End Property
Private _Preco As Double
Public Property Preco() As Double
Get
Return _Preco
End Get
Set(ByVal value As Double)
_Preco = value
End Set
End Property
Function RetornaDataValidade() As DateTime
Return DataFabricacao.AddDays(NumeroDias)
End Function
End Class
Arquitetura e Desenvolvimento de Software 