今天完成了ORM-Lite的对象类,并开始写用户管理模块。
对象类举例:
Class t_user
Public entity_guid
Private m_f_group_id_pk
Private m_f_name
Private m_f_remark
Public Function new_instance()
set new_instance = New t_group
End Function
Public Property Get f_group_id_pk()
f_group_id_pk = m_f_group_id_pk
End Property
Public Property Let f_group_id_pk(newValue)
m_f_group_id_pk = newValue
End Property
Public Property Get f_name()
f_name = m_f_name
End Property
Public Property Let f_name(newValue)
m_f_name = newValue
End Property
Public Property Get f_remark()
f_remark = m_f_remark
End Property
Public Property Let f_remark(newValue)
m_f_remark = newValue
End Property
Private Sub Class_Initialize()
' set Default Value
End Sub
End Class
完成ORM-Lite对象类并开启用户管理模块
博主今日完成了ORM-Lite的对象类,还开始编写用户管理模块。文中给出了对象类示例,包含公共和私有属性及方法,如属性的获取与设置函数等。
1万+

被折叠的 条评论
为什么被折叠?



