想编一个病人类，因为是初学着却无从下手,请帮助

Question

这样好了：
type sick
     m_name as string'病人名
     m_sex as string'病人性别
     m_flag as integer'住院or门诊
     m_NO as string'号
end type

Answer 1

class PTinfo
    private ptName as string*10
    private ptSex as bool
    private ptAge as integer
    ptNumber as string*20
    ptMuber as string*20
    private ptFamily as string*20
...
...??如何？？

Answer 2

class PTinfo
    private ptName as string*10
    private ptSex as bool
    private ptAge as integer
    ptNumber as string*20
    ptMuber as string*20
    private ptFamily as string*20
...
...??如何？？