Public Sub New(ByVal Menu As String, ByVal Harga As String)
_Menu = Menu
_Harga = Harga
End Sub
Private _Menu As String
Public Property Menu() As String
Get
Return _Menu
End Get
Set(ByVal value As String)
_Menu = value
End Set
End Property
Private _Harga As String
Public Property Harga() As String
Get
Return _Harga
End Get
Set(ByVal value As String)
_Harga = value
End Set
End Property