Et spørgsmål til en info klasse ?

Hejsa,

jeg benytter mig af info klasser til brug på tværs af mine lag. det kunne se sådan ud :

Private _Id As Integer
Private _Name As String

Public Property Id() As Integer
    Get
        Return _Id
    End Get
    Set(ByVal Value As Integer)
        _Id = Value
    End Set
End Property

Public Property Name() As String
    Get
        Return _Name
    End Get
    Set(ByVal Value As String)
        _Name = Value
    End Set
End Property

Public Sub New()
    Myclass.New(0, "")
End Sub

Public Sub New(Byval intId as Integer, Byval strName as String)
    _Id = intId
    _Name = strName
End Sub

Når så jeg tilføjer værdier til denne inf klasse gør jeg det på følgende måde :

Dim objInfo As New InfoClass(1, "Hans")
objBLL.Create(objInfo)

Men når jeg så i mit business lag vil tilgå værdierne for f.eks. at lave noget md5 på en værdi fra info klassen så går jeg lidt i stå, skal jeg så lave en ny instans af min info klasse som nedenfor for at dette virker :

Public Function Create(Byval objInfo as Info)
    Dim objCheck As New Info
    objCheck.Id = objInfo.Id
    objCheck.Name = md5Hash(objInfo.Name)
    objDAL.CreateNew(objCheck)
End Function

Er det måden jeg skal gøre det på eller skal jeg gribe det an på en anden måde ?

/Websam