Namespace Items.Mail Public Class ThanksMail Inherits MailItem Public Overrides ReadOnly Property Description As String = "Stationary designed for a thank-you note. Let a Pokémon hold it for delivery." Public Sub New() _textureRectangle = New Rectangle(216, 480, 24, 24) End Sub End Class End Namespace