Namespace Items.Apricorns Public Class WhtApricorn Inherits Apricorn Public Overrides ReadOnly Property Description As String = "A white Apricorn. It doesn't smell like anything." Public Sub New() _textureRectangle = New Rectangle(0, 96, 24, 24) End Sub End Class End Namespace