18 lines
316 B
VB.net
18 lines
316 B
VB.net
Public Class CMenu
|
|
|
|
Private _name As String = ""
|
|
Public Sub New(p_name As String)
|
|
_name = p_name
|
|
End Sub
|
|
|
|
Public Property Name As String
|
|
Get
|
|
Return _name
|
|
End Get
|
|
Set(value As String)
|
|
_name = value
|
|
End Set
|
|
End Property
|
|
|
|
End Class
|