Mayumi Blogger Template

Public
Class Anakwanita

Private XWanita, XBapak, XIbu As
String

Private XUsiaW As
Byte

Public
Property NamaWanita() As
String

Get

Return XWanita

End
Get

Set(ByVal value As
String)

XWanita = value

End
Set

End
Property

Public
Property UsiaWanita() As
String

Get

Return XUsiaW

End
Get

Set(ByVal value As
String)

XUsiaW = value

End
Set

End
Property

Public
Property NamaBapak() As
String

Get

Return XBapak

End
Get

Set(ByVal value As
String)

XBapak = value

End
Set

End
Property

Public
Property NamaIbu() As
String

Get

Return XIbu

End
Get

Set(ByVal value As
String)

XIbu = value

End
Set

End
Property

End
Class