www.pudn.com > vb.net_CAD.rar > CGElement.vb, change:2003-01-05,size:376b


Public Class CGElement 
    Private m_ID As Integer 
 
    Public Property ID() As Integer 
        Get 
            Return m_ID 
        End Get 
        Set(ByVal newValue As Integer) 
            m_ID = newValue 
        End Set 
    End Property 
 
    Public Sub New() 
    End Sub 
 
    Public Sub Draw() 
        Console.WriteLine("ͼԪ") 
    End Sub 
End Class