Namespace Items.MegaStones ''' ''' The Mega Stone for Banette. ''' Public Class Banettite Inherits MegaStone Public Sub New() MyBase.New("Banette", 354) _textureRectangle = New Rectangle(144, 0, 24, 24) End Sub End Class End Namespace