CallSub in Class

is possible code

ClassDTO = class generic

example

ClassBLL

Code:

  Private Sub GetAllAtributtes(ClassDTO)

CallSub2(ClassDTO, "setID","100")

End Sub  

classDTO

Code:

  Sub Class_Globals
Private mvarID As Long 
Private mvarName As String 
End Sub

Public Sub getID() As Long
Return mvarID
End Sub
Public Sub setID(value As Long)
    mvarID = value
End Sub

Public Sub getName() As String
Return mvarName
End Sub
Public Sub setName(value As String)...  

CallSub in Class

from B4X Community - Android, iOS, desktop, server and IoT programming tools http://ift.tt/28Up09j
via IFTTT