Public Class HardwarePartWindowVM Private m_HardwarePartV As HardwarePartV Private m_HardwarePartVM As HardwarePartVM Public ReadOnly Property HardwarePart As ContentControl Get Return m_HardwarePartV End Get End Property Sub new (ref_HardwarePartVM As HardwarePartVM) m_HardwarePartVM = ref_HardwarePartVM m_HardwarePartV = New HardwarePartV(m_HardwarePartVM) End Sub End Class