Imports System.Numerics Public Class Material Implements IComparable(Of Material) Public Property Image As Image = Nothing Public Property Color As Color? = Nothing Public Property Opacity As Single? = Nothing Public Property Wrap As New Vector2(10497, 10497) Public Property Scale As New Vector2(1.0F, 1.0F) Public Property Tag As Object = Nothing Public Function CompareTo(obj As Material) As Integer Implements IComparable(Of Material).CompareTo 'If obj Is Me Then Return 0 'If obj Is Nothing Then Return 1 'Return -1 Return GetHashCode() - If(obj?.GetHashCode, 0) End Function End Class