Algumas pessoas preferem usar o VB.net em seus projetos, por isso esta página wiki é dedicada a exemplificar a construção de uma classe Persist nesta linguagem.

O mais importante é saber declarar as propriedades TableName, Field e suas variações... etc.

Todas as classes precisam da declaração do TableName que é feito da seguinte forma:

<Table(TableName:="City")> _
Public Class City
Inherits Persist

....

End Class

As propriedades que representam campos no banco de dados, precisam da assinatura Field equivalente.

Para os campos que são chave primária e são auto-incrementados:

<PrimaryKeyField(IsIdentity:=True)> _
Public Property CityId() As Integer
Get
Return _CityId
End Get
Set(ByVal value As Integer)
_CityId = value
End Set
End Property

Campos comuns usam a classe Field:

<Field()> _
Public Property Name () As String
Get
Return _Name
End Get
Set(ByVal value As String)
_CodAtendimento = value
End Set
End Property

O construtor precisa chamar a base Persist:

Public Sub New(ByVal ParamArray keys As Object())
MyBase.New(keys)
End Sub

Continua simples como tem que ser. É tudo uma questão de sintaxe.

Last edited Mar 9, 2010 at 2:45 PM by ivanpaulovich, version 1

Comments

No comments yet.