Und wie kann es bei dem Pilz sein, dass dieser ungiftig ist? Du gibst den Wert doch schon zurück (Gift = tmpOld + 2), bevor du überprüfst ob der Maximalwert überschritten wurde. Und wird nach der Werterückgabe die Property überhaupt noch fortgesetzt? Bei Java ist es nämlich so, dass nach der Werterückgabe die Methode beendet wird, aller Code der dahinter steht wird dann nicht mehr berücksichtigt.

Public Property Get Gift() As Long
  Gift = tmpOld + 2
  If Gift > tmpMaxGift Then Gift = tmpMaxGift
End Property

Nuld